Select Code to Download

perl -e " open $dirname, q/../ or die $!, $/, $^E, $/ "
bash: !,: event not found

perl -e ' open $dirname, q/../ or die $!, $/, $^E, $/ '
(no error)

use strict;
use warnings;
...
5
7;7;7
5