bash awk codes to perl

phamp008 · #1 (**permalink**) 03-15-2008

Hi,

I am interesting in writing the following bash codes into perl

My script is simple take field 2 in /etc/passwd and put into an array

#!/bin/bash
PASSWD_FILE=/etc/passwd
A=(`awk -F: ' { print $2 }' $PASSWD_FILE `)

Can someone give me equivalent codes in perl ?

ghostdog74 · #2 (**permalink**) 03-15-2008

how about trying it out

1) read the file line by line using while loop
2) split the line by ":" as delimiter
3) get the second element using array indices.

More UNIX and Linux Forum Topics You Might Find Helpful
Thread	Thread Starter	Forum	Replies	Last Post
perl-like split function for bash?	eur0dad	Shell Programming and Scripting	5	09-05-2008 07:23 PM
passing variable from bash to perl from bash script	arsidh	Shell Programming and Scripting	10	06-04-2008 01:25 PM
Another bash shell to perl conversion	freak	UNIX for Dummies Questions & Answers	6	05-29-2008 02:04 PM
bash to perl conversion	thumper	Shell Programming and Scripting	2	07-14-2006 04:36 PM
How to get exit status codes in bash from Perl?	siegfried	Shell Programming and Scripting	5	10-26-2005 12:07 PM

Thread Tools	Search this Thread
Show Printable Version Email this Page	Search this Thread: Advanced Search
Display Modes	Rate This Thread
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode	Rate This Thread:


	Powered by