Select Code to Download

#! perl -slw
use strict;
...
84
91
98

my( $x, $y, $z ) = ( 1, 4, 7 );
print do{
...
            MACRO_RETURN: $MACRO_RETURN
       };
}

package Macro;
use strict;
...


1;