Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: How to awk a grep result in-script

by haukex (Archbishop)
on Nov 14, 2019 at 18:29 UTC ( [id://11108689]=note: print w/replies, xml ) Need Help??


in reply to How to awk a grep result in-script

A bare split operates on the special variable $_, but you're not setting that in your script.

If you want to do this in a oneliner, see perlrun for the -n and -a switches. For example, if I understand your requirement, the command line ps -ef | perl -lane 'print $F[1] if /kdfadm/ && m{/opt/kdf/home}' should do what you want.

However, the preferred method is to write a script, and to use modules appropriate for the task. For example, you might want to look at Proc::ProcessTable. There is no need to call the external tools awk, sed, or grep, as that can be written entirely in Perl. In the (rare) cases you do need to run an external command, I wrote about that here, with example code. Update: Maybe if you can tell us more about what the bigger picture is, we can help with more specific suggestions.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others musing on the Monastery: (5)
As of 2024-03-28 10:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found