for my $file (qw(files.txt data.txt)) {
    unlink($file)
        or $!{ENOENT}
        or die("Unable to unlink '$file': $!");
}