Help for this page

Select Code to Download


  1. or download this
    ---
-
  - 1
  - sub { print "one" }
  2. or download this
    use YAML;

my $s = YAML::LoadFile( "t.yml" );
my $f = $s->[ 0 ]->[ 1 ];
$f->();
  3. or download this
    perl t.pl
Undefined subroutine &main::sub { print "one" } called at t.pl line 10
+.