in reply to Re^2: Can figure out a way to get File::Grep's fgrep to chomp matches
in thread Can figure out a way to get File::Grep's fgrep to chomp matches

chomp doesn’t return quite like that. This should work– 

my @line = map { chomp; $_ }  fgrep { /^[2-6] .+$/ } *DATA;

[download]

But maybe this is better– 

chomp( my @line = fgrep { /^[2-6] .+$/ } *DATA );

[download]

Replies are listed 'Best First'.
Re^4: Can figure out a way to get File::Grep's fgrep to chomp matches
by Lady_Aleena (Priest) on May 14, 2017 at 00:19 UTC

    Here is what your suggestion returned...

    $VAR1 = [
          {
            'count' => 5,
            'matches' => {
                           '3' => '4 baz
',
                           '5' => '6 quux
',
                           '2' => '3 bar
',
                           '4' => '5 qux
',
                           '1' => '2 foo
'
                         },
            'filename' => *::DATA
          }
        ];

    [download]

    I am beginning to believe this module is not set up for chomping the matches until they are munged later. The reason I even started this was that the dumper data looks bad with the newlines in the data.

    No matter how hysterical I get, my problems are not time sensitive. So, relax, have a cookie, and a very nice day!
    Lady Aleena
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom