Subversion Repositories sysadmin_scripts

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
42 rodolico 1 
#! /usr/bin/env perl
2 
 
3 
use warnings;
4 
use strict;
5 
 
6 
use YAML::Tiny; # apt-get libyaml-tiny-perl under debian
7 
 
8 
my $config;
9 
my $temp = join( '', <> );
10 
eval $temp;
11 
 
12 
my $yaml = YAML::Tiny->new( $config );
13 
print $yaml->write_string( 'testconf.yaml' );
14 
 
15 
1;
16