sub unlink_exists {
  my ($filename) = @_;
  my $result = -e $filename;
  if ($result) {
    unlink $filename or die "Couldn't remove '$filename' : $!\n";
  };
  return $result;
};

if ( unlink_exists($a) || unlink_exists($f) ... );