Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -T
    use strict;
    ...
    print "result: $result\n";
    __END__
    result: 15