C:\chas_sandbox\columns-by-name>
copy con ARGVtest.pl
#!/usr/bin/perl -WCD

use strict;
use warnings;
use Data::Dumper;

$\ = $/;
my $debug = 1;

#array of fields to display
my @processFields = ('Caption','ParentProcessId','ProcessId','CommandLine');

#ARGV processing
my $searchfor = $ARGV[0] ? join(' ',@ARGV) : die("I need a process to look for."
);
^Z
        1 file(s) copied.

C:\chas_sandbox\columns-by-name>
notepad ARGVtest.pl

##</code><code>##

C:\chas_sandbox\columns-by-name>
type ARGVtest.pl
#!/usr/bin/perl -WCD

use strict;
use warnings;
use Data::Dumper;

$\ = $/;
my $debug = 1;

#array of fields to display
my @processFields = ('Caption','ParentProcessId','ProcessId','CommandLine');

#ARGV processing
my $searchfor = $#ARGV ? join(' ',@ARGV) : die("I need a process to look for.");
#               ^^^^^^ change here

C:\chas_sandbox\columns-by-name>
ARGVtest.pl
I need a process to look for. at C:\chas_sandbox\columns-by-name\ARGVtest.pl lin
e 14.

C:\chas_sandbox\columns-by-name>
ARGVtest.pl chas
I need a process to look for. at C:\chas_sandbox\columns-by-name\ARGVtest.pl lin
e 14.

##</code><code>##

C:\chas_sandbox\columns-by-name>
type ARGVtest.pl
#!/usr/bin/perl -WCD

use strict;
use warnings;
use Data::Dumper;

$\ = $/;
my $debug = 1;

#array of fields to display
my @processFields = ('Caption','ParentProcessId','ProcessId','CommandLine');

#ARGV processing
print Dumper(\@ARGV);
print $#ARGV;
my $searchfor = $#ARGV ? join(' ',@ARGV) : die("I need a process to look for.");


C:\chas_sandbox\columns-by-name>
ARGVtest.pl
$VAR1 = [
          ''
        ];

0
I need a process to look for. at C:\chas_sandbox\columns-by-name\ARGVtest.pl lin
e 16.

C:\chas_sandbox\columns-by-name>
ARGVtest.pl chas
$VAR1 = [
          ' chas'
        ];

0
I need a process to look for. at C:\chas_sandbox\columns-by-name\ARGVtest.pl lin
e 16.