Select Code to Download

$ > fred
$ cp fred not_a_real_dir/
...
$ mkdir not_a_real_dir/
$ cp fred not_a_real_dir/
$

$ perl -wE 'my $x; say $x ne "" ? 1 : 0'
Use of uninitialized value $x in string ne at -e line 1.
...
$ perl -wE 'my $x = ""; say $x ne "" ? 1 : 0'
0
$