Help for this page

Select Code to Download

Select or download this

#! /usr/bin/perl
use strict;
use warnings;
...
my @stuff = grep /\brun\b/x, @other_stuff;

for (@stuff) { print $_ . "\n"; }

Select or download this

ww@GIG:~/pl_test$ perl greprun.pl
run
running
...
I run a mile per day.
Run, rabbit, run!
ww@GIG:~/pl_test$