Select Code to Download

#!/usr/bin/perl
use strict;
...

__END__

All scalars defined and non-empty
empty
not defined

All scalars defined and non-empty
'$baz' empty
'$bar' not defined