Print @ARGV windows and linux. Different results

[jr8rdt]

I run below program on windows it displays the content of @ARGV.

But when I run this program on Linux redhat, it doesn't print the @ARGV. $ARGV[x] doesn't work either.

any explanation


my $file_feed = shift or die "To run the program: realtime_all <file> --> System Error: Missing Arguments ";
open (INDEX, $file_feed) or die "Can't open $file_feed: $!";
@ARGV = <INDEX>;
chomp @ARGV;
close (INDEX);
print @ARGV;

 

[KevinADC]

see if the file has anything in it:

my $file_feed = shift or die "To run the program: realtime_all <file>  --> System Error: Missing Arguments ";
open (INDEX, $file_feed) or die "Can't open $file_feed: $!";
print <INDEX>;
#@ARGV = <INDEX>;
#chomp @ARGV;
close (INDEX);
#print @ARGV;

------------------------------------------
- Kevin, perl coder unexceptional!

 

[jr8rdt]

Yes. the file has something in it.

file1.txt
file2.txt
file3.txt

 

[jr8rdt]

ah..found something.

Linux doesn't like chomp @ARGV;

this code won't print

my $file_feed = shift or die "To run the program: realtime_all <file> --> System Error: Missing Arguments ";
open (INDEX, $file_feed) or die "Can't open $file_feed: $!";
@ARGV = <INDEX>;
chomp @ARGV;
print @ARGV;
close (INDEX);

but this will

print @ARGV;
chomp @ARGV;

why is that???

 

[jr8rdt]

find the answer. looks like it is because the file was created in win and hence the problem. when I re-typed the file again in linux it works fine.

 

[EBGreen]

You haven't changed the value of $/ have you?

[red]"... isn't sanity really just a one trick pony anyway?! I mean, all you get is one trick, rational thinking, but when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick[/red]

 

[EBGreen]

On a *nix box, \n is \012 whereas on a win box \n is \015\012. So if you try to chomp a win file on a *nix box you will leave behind a \015.

[red]"... isn't sanity really just a one trick pony anyway?! I mean, all you get is one trick, rational thinking, but when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick[/red]