© 2005 A.P. Lawrence
Next
Previous
Return to Start Page
This script will print "x cab":
#!/usr/bin/perl
@num=qw(axc ace def cab ghi);
@f=grep {$_="x $_" if /ab/} @num;
print @f;
Have you tried Searching this site?
Unix/Linux/Mac OS X support by phone, email or on-site: Support Rates
This is a Unix/Linux resource website. It contains technical articles about Unix, Linux and general computing related subjects, opinion, news, help files, how-to's, tutorials and more. We appreciate comments and article submissions.
/Tests/Perl/q0023.html copyright Tony Lawrence All Rights Reserved
| Views for this page | ||||
|---|---|---|---|---|
| Today | This Week | This Month | This Year | Overall |
| 1 | 3 | 7 | 146 | 603 |