#!/usr/bin/perl use strict; while (<DATA>) { print if ( /^name:\s\w+\s?\w+/ ... /^.*$/ ); } __DATA__ name: John Doe 23 name: Jane Doe 37 test: asdas name: Joe Doe 12
In reply to Re: Input Output Question
by bichonfrise74
in thread Input Output Question
by coco
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |