@selection = grep { /REGEX/ } @array

and plz give us feedback with code you tried.

see also grep and perlre

i tried like this but it doesn't show any result

my@colors=('red', 'cyan', 'yellow', 'blue' );
my @yw_colors = grep  {/yw/}  @colors;
[download]

UPDATE: Add a print statement. And the regex should be /x|y/, i.e. you want to find an x or an y, not x followed by y. Another possible regex that would work would use a character class: /[xy]/

$ perl -e 'print join " ", grep { /y/ and /w/}  ('red', 'cyan', 'yello
+w', 'blue' )'
yellow
[download]

"what is the functionality of [] and |?"

"I didn't find character class :("

"let me know"

rammohan, you got a lot of feedback and good advice. Very cool.

But can you imagine how all this guys figured out this stuff?

Let me us know...

My best regards, Karl

Alternatively, there's beginning Perl training available here.

Unbelievable. Unfortunately i'm not from India and i really want no Perl training. But perhaps some bros think that i should have one. Please donate (beer accepted). Regards, Karl

Update:...and why the hell are this gurus interested in my sex and age?

«The Crux of the Biscuit is the Apostrophe»

@a = qw/red cyan yellow blue why do you want this at all/;
/y/ and /w/ and print "$_\n" for @a;
[download]

Use http://www.google.com

You got that? Once there, type in: perl "character class"

Links galore...

yes it's possible

  DB<114> @a=(12,-85,36,-10,75,-38)
 => (12, -85, 36, -10, 75, -38)

  DB<115> @a = grep { $_ >= 0 } @a
 => (12, 36, 75)
[download]

But for the basics people here appreciate if you first read docs (or a Perl book) and try the examples there before asking.

People already provided links (like here) and they would like to get feedback if those links helped (and if not, why, to be able to improve them)

Thats the way we help to learn efficiently! :-)

Cheers Rolf

( addicted to the Perl Programming Language)

Try this:

$ perl -e '@positive_int = grep {$_ >=0 }  (12,-85,36,-10,75,-38); pri
+nt "@positive_int"'
12 36 75
[download]

Of course it's possible, just place a conditional in the grep.

$ perl -Mstrict -Mwarnings -E '
my @array = ( 12, -85, 36, -10, 75, -38 );
say qq{@array};
my @notNegatives = grep { $_ >= 0 } @array;
say qq{@notNegatives};'
12 -85 36 -10 75 -38
12 36 75
$
[download]

I hope this is helpful.

Cheers,

JohnGG

Yes, grep works with arbitrary expressions. Just remember that every single value in the array is aliased to $_ inside the grep (i.e. $_ is a placeholder for the array value).

Thanks to all it works for me..its silly point sorry for asking here.. from now on words i'll try my level best..Thank you for advices