my $filemode = "immolate"; # scalar context