Select Code to Download

sudo mkdir /var/memdir

tmpfs /var/memdir tmpfs nodev,nosuid,size=1M 0 0

use warnings;
use strict;
...
unlink $lock or die "Can't delete the damned lock file $lock: $!";

printf "Exists after delete: %d\n", -e $lock // 0;

spek@scelia ~/scratch $ perl script.pl
Exists after create: 1
Exists after delete: 0