You have several problems. You are supplying two arguments on the command line so the size of @ARGV is going to be 2.

You would be better off checking to see if @ARGV contains anything and continuing from there.

You are opening the file handle FILE, then reading from STDIN, so you probably are not getting what you expect.

You should never use the captured variables from a regex without checking to see if the match succeded.

use warnings; #<-- also a good idea, especially if you are just starti
+ng perl programming
use strict;

die "Specify a file path\n" unless @ARGV;

open my $fh, shift or die "Cannot open file: $!\n";

while (<$fh>) {
    if (/(\S+)\s+\S+\s+(\S+)\s+(.*)/){ #testing regex and tags
        print "$1, $2, $3\n"; #testing printing
    }
}
close $fh;
print "Done!\n";

[download]

Then leave 'open' out of the command line.

myperlscript.pl "C:/path/to/file/on_windows_pc/file.txt"

[download]

In reply to Re: Using @ARGV by thundergnat
in thread Using @ARGV by Tech77

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.