I've given this a couple attempts.I'm really trying to read over the notes but am just plain lost.
This is the error I got with the code:
"my" variable $dir_path masks earlier declaration in same statement at parse.pl
line 5.
syntax error at parse.pl line 5, near "opendir"
Can't use global $! in "my" at parse.pl line 5, near "die $!"
syntax error at parse.pl line 7, near ") {"
Global symbol "$file_content" requires explicit package name at parse.pl line 8.
Execution of parse.pl aborted due to compilation errors.
#!/usr/bin/perl
use strict;
use warnings;
my $dir_path="c:/incoming/temp;"
opendir my $DIR, $dir_path or die $!;
open my $OUT, '>>', 'c:/vehicles.txt' or die $!;
while (my $file_name = readdir($DIR) {print "$file_name\n";}
print MYFILE $file_content;
close (MYFILE)