Select Code to Download

$ ls
hello
...
$ perl -e 'my $dir = q(not$socooldir); system "mkdir \Q$dir" and die "
+execution failed\n"'
mkdir: cannot create directory `not$socooldir': File exists
execution failed

my @lines = `shellcmd args`; # list context
my $line = `shellcmd args`; # scalar context