Hi all, I think you should use grep instead of map in this partciluar case
Regards Alex 2011/12/2 <[email protected]>: > Hi All > > My array @sympd_list has following lines : > -------------------- > /dev/sdd 0BE0 07F:0 08C:D0 Unprotected N/Grp'd RW > 500 > /dev/sde 0BE1 07F:0 07A:C0 Unprotected N/Grp'd RW > 500 > /dev/sdf 0BE2 07F:0 08D:C0 Unprotected N/Grp'd RW > 500 > /dev/sdg 0BE3 07F:0 07B:D0 Unprotected N/Grp'd RW > 500 > /dev/sdj 201A 07H:0 07A:D5 Unprotected N/Grp'd RW > 3 > --------------------------- > > > I want second column in another array : > > 0BE0 > 0BE1 > 0BE2 > 0BE3 > 201A > > I used map function with pattern matching as >>> my @sympd_dev_list = map > {$_ =~ s/^\/\S+\s+([0-9A-F]{4}).+/$1/ } @sympd_list; > > I do not get correct output in map function . But if I use same pattern > matching in a foreach loop , then I get right output . > > Could anyone tell me what is wrong in my map function ? > > -Sunita > > -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/
