Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: text munging utility

by graff (Chancellor)
on Jan 27, 2004 at 13:54 UTC ( #324413=note: print w/replies, xml ) Need Help??

in reply to text munging utility

This is a nifty idea -- though I think jeffa's comment is dead-on. The only other point, not a major one: if the input list is long and you're going to execute some shell command on lots of items in rapid succession, you might save some overhead this way:
open( SH, "| /bin/sh" ); ... sub execute { my ($com, $columns) = @_; # substitute the value from the appropriate column for \0, \1, etc. $com =~ s/\\(\d+)\;?/$columns->[$1]/g; print SH "$com\n"; }
This can make a difference when the command line being run involves shell metacharacters (e.g. pipes, redirection, logic operators, etc), because when you pass something like that to "system()", it invokes a new shell to run it. For simpler command lines, printing to SH simply means that perl doesn't do "fork;execvp" (which is what the shell would do anyway, I suppose). For a demonstration, look at (my shameless plug for) shloop -- execute shell command on a list.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://324413]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (3)
As of 2020-11-26 07:37 GMT
Find Nodes?
    Voting Booth?

    No recent polls found