##
my $searchfor = $#ARGV >= 0 ? join(' ',@ARGV) : die("I need a process to look for.");
####
my $searchfor = @ARGV ? join(' ',@ARGV) : die("I need a process to look for.");
####
@ARGV or die("I need a process to look for.");
my $searchfor = join(' ',@ARGV);