using fields in perl

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: using fields in perl by hsinclai (Deacon) on Dec 25, 2007 at 04:14 UTC
Yes, autosplit :) `perl -ane 'print $F[0] . $/;' FILE` is close to what you'd get with `awk '{print $1}' FILE` Do `perldoc perlrun`, look for `-a` for the gory details.	[reply] [d/l] [select]
Re^2: using fields in perl by ysth (Canon) on Dec 25, 2007 at 05:21 UTC
Perhaps better: `perl -lane'print $F[0]' FILE` [download] (I wish it could be -elan.) -- CollegeGear.com - more than just college gear (though, yes, we have college-branded teddy bears)	[reply] [d/l]
Re^3: using fields in perl by jettero (Monsignor) on Dec 25, 2007 at 13:00 UTC
You guys, I'm not sure '-a' is quite equivalent to the awk fields. I'm no good at awk, but I believe it splits on `m/\s+/` rather than `\s`. perlrun says '-a' is this: `while (<>) { @F = split(' '); print pop(@F), "\n"; }` [download] But I think you'd have to `@F = grep {$_} @F` or change the split or something. no? (Also, I think elan should work. I mean, I know it doesn't, but isn't there some posix-y arg processing style where if 'a' and 'b' take arguments "-dacbe aarg barg" still works? Perhaps I imagined that.) UPDATE: oh, jstrom, I did not know that... I assumed split splooged any argument into a regex. -Paul	[reply] [d/l] [select]
Re^4: using fields in perl by JStrom (Pilgrim) on Dec 25, 2007 at 13:57 UTC
Re^5: using fields in perl by demerphq (Chancellor) on Dec 25, 2007 at 20:44 UTC
Re^4: using fields in perl by ysth (Canon) on Dec 25, 2007 at 18:03 UTC
Re: using fields in perl by rgiskard (Hermit) on Dec 26, 2007 at 02:03 UTC
A similar question was posted a while back. Take a look at some of the responses (like a golfed solution by dave_the_m) at this node.	[reply]
Re: using fields in perl by planetscape (Chancellor) on Dec 26, 2007 at 11:47 UTC
Please see What is the simplest way to print a field, as in $3 does in awk. HTH, planetscape	[reply]