New script gruta.
[gruta.git] / bin / gruta
blob4a6f5e51d04379b17a9030c5f80136ad0a0cb035
1 #!/usr/bin/perl
3 use Gruta;
4 use Gruta::Source::DBI;
5 use Gruta::Source::FS;
7 my $src_str = ARGV[0];
9 print $src_str, "\n";
11 exit 0;