Bash for loop variable pass equivalent in perl

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

Replies are listed 'Best First'.
Re: Bash for loop variable pass equivalent in perl by BrowserUk (Patriarch) on Aug 10, 2012 at 16:37 UTC
`perl -ple1 Overlap.txt` [download] With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. The start of some sanity?	[reply] [d/l]
Re^2: Bash for loop variable pass equivalent in perl by hbm (Hermit) on Aug 10, 2012 at 16:41 UTC
Cool. I've always done the longer: `perl -lne 'print' Overlap.txt` [download] Update: And even shorter (and more arbitrary): `perl -pe3 Overlap.txt` [download]	[reply] [d/l] [select]
Re: Bash for loop variable pass equivalent in perl by aitap (Curate) on Aug 10, 2012 at 17:05 UTC
In addition to the previous comments, using for var in `cat file` is usually wrong. The file will not only be split by newlines, but by other symbols (defined in shell variable `IFS`; spaces, newlines and tabs by default) too. If you need similar behaviour, you need `perl -lpe 'join "\n",split/[\t ]/' file`. _{EDIT: fixed code} Sorry if my advice was wrong.	[reply] [d/l] [select]
Re^2: Bash for loop variable pass equivalent in perl by aaron_baugher (Curate) on Aug 10, 2012 at 18:06 UTC
And to get perl's default line-by-line behavior in the shell, set IFS to a newline (The ctrl-V ctrl-J sequence inserts a raw newline into the command without ending it): $ IFS="^V^J "; for i in `cat file`; do echo aaa $i; done [download] Aaron B. Available for small or large Perl jobs; see my home node.	[reply] [d/l]