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

Thanks for trying, but here are the results of both directions:

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

$VAR1 = [
          0
        ];
[download]

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

$VAR1 = [];
[download]

It is okay if it is not possible until later munging. It is just a tad annoying.

No matter how hysterical I get, my problems are not time sensitive. So, relax, have a cookie, and a very nice day!

Lady Aleena

Comment on Re^2: Can figure out a way to get File::Grep's fgrep to chomp matches Select or Download Code

Replies are listed 'Best First'.
Re^3: Can figure out a way to get File::Grep's fgrep to chomp matches by Your Mother (Archbishop) on May 14, 2017 at 00:14 UTC
`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]	[reply] [d/l] [select]
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]
Re^3: Can figure out a way to get File::Grep's fgrep to chomp matches by LanX (Saint) on May 14, 2017 at 00:08 UTC
I see, please try `my @line = fmap { chomp; /^[2-6] .+$/ ? $_ : () } *DATA;` Sorry, I don't think this interface was well designed ... HTH :) Cheers Rolf _{(addicted to the Perl Programming Language and ☆☆☆☆ :) Je suis Charlie!}	[reply] [d/l]
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:16 UTC
It worked, however, it would not help when feeling it a list of files where one wants the line numbers and file names. `$VAR1 = [ '2 foo', '3 bar', '4 baz', '5 qux', '6 quux' ];` [download] If I feed it a list of files, I get a list of everything which matches but no line numbers and file names attached. You helped a lot today! Thank you! *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]
Re^5: Can figure out a way to get File::Grep's fgrep to chomp matches by LanX (Saint) on May 14, 2017 at 00:50 UTC
As already mentioned, I don't like this implementation, far too many surprises. No wonder it's version 0.02 You could fix it probably with a leading chomp inside the fgrep, but frankly it's easier to code it the old fashioned way than to struggle with this interface. I don't have this module installed, sorry. Cheers Rolf _{(addicted to the Perl Programming Language and ☆☆☆☆ :) Je suis Charlie!}	[reply]