- or download this
package module_1;
require Exporter;
...
@EXPORT_OK = qw($A);
our $A = 100;
1;
- or download this
#/usr/bin/perl
# script_1.cgi
...
h1("\$A = $A"),
a( {href=>"script_2.cgi"}, "script_2"),
end_html;
- or download this
#/usr/bin/perl
# script_2.cgi
...
h1("\$A = $A"),
a( {href=>"script_1.cgi"} ,"script_1"),
end_html;