On 2018-11-21 3:08 a.m., Amanda Paziuk wrote:
I'm hoping someone can assist as I'm having difficulty with parsing a
section of the following configuration:
This is the code I have:
push @list, $datum; # should only contain '1', and '3'
>
> ...
>
foreach my $i (@list){ # loops t
> On Nov 21, 2018, at 3:08 AM, Amanda Paziuk wrote:
>
> Folks,
>
> I'm hoping someone can assist as I'm having difficulty with parsing a section
> of the following configuration:
>
> This is the code I have:
>
> open (IN, $file); # only sharing this because you need to know where
> @l
These 2 lines:
if (/^ file-id $i/) {
and
elsif (/^ exit/) {
Need to be like this:
if (/^\s+file-id $/i) { # 2 CHANGES HERE - PAY CLOSE ATTENTION
and
elsif (/^\s+exit/i) {
I am not sure this will fix all your
problems.
Mike
On 11/21/2018 5:08 AM, Amanda Paziuk wrote:
Folks
Folks,
I'm hoping someone can assist as I'm having difficulty with parsing a
section of the following configuration:
This is the code I have:
open (IN, $file); # only sharing this because you need to know
where @list is derived.
while () {
chomp;
next unless /file-id/;
