my ($filemode) = ("immolate"); # list context