Select Code to Download

#! perl -slw
use strict;
...
our $ERROR_FILE = 'fred';

Junk::showIt();

package main;
our $ERROR_FILE;
...
}

1;

C:\test>junk.pl
fred