Select Code to Download

unlink ( glob(...) || print "..." );

sub print_context {
    my $wa = wantarray;
...
with or :
list
12

unlink( glob(...) ) || print "...";

unlink glob(...) or print "...";