shmem [qwurx] ~ > perl -wle 'my $f = "X"; open my $fh, $f'
shmem [qwurx] ~ >