my @files = <*.tmp>; if (@files) { unlink @files or warn "Problem unlinking @files: $!"; } else { warn "No files to unlink!\n"; } # Or unlink or warn "Problem unlinking $_" for <*.tmp>;