Help for this page

Select Code to Download


  1. or download this
    package Max;
    our $tiny_text = 200;
    ...
    package main;
    print "From main: $Max::tiny_text\n";
    print "From main: $Max::long_text\n";