src/perl6/tryfoo

   1 #!/usr/bin/env perl
   2
   3 BEGIN { $ENV{STD5DEBUG} = 16383; }
   4 use STD;
   5 use utf8;
   6 use YAML::XS;
   7 use Encode;
   8
   9 print "Starting...\n";
  10 my $what = 'foo';
  11 my $text = "@ARGV";
  12 my $r = STD->new($text)->$what();
  13 print Dump($r);