Help for this page

Select Code to Download

Select or download this

use strict;
my $name;
...
        print "$name\n";
}
print "*$name*\n";

Select or download this

use strict;
my $name;
...
        print "$name\n";
}
print "*$name*\n";