Select Code to Download

[linux host] $ grep "Something" sample.log | perl myParser.pl 

...
foreach $line (<>) {
...
}

$ grep "Something" sample.log | perl myParser.pl VERTICAL

$ grep "Something" sample.log | perl myParser.pl COLUMN

#!/usr/bin/perl
use strict;
...
foreach $line (<>) {
...
}

Can't open VERTICAL: No such file or directory at SimpleTest.pl line 1
+1.
First Arguement is : VERTICAL