Help for this page

Select Code to Download


  1. or download this
    # test code
    my $a = 
    ...
    }->();
    END { print "eval over\n" }';
    eval $a;
    
  2. or download this
    # module: filtertest
    package filtertest;
    ...
        )
    }
    1;
    
  3. or download this
    use filtertest; 
    print "Hello word\n";