#!/usr/bin/perl -n
s/\<.*?>//g;
@fol = split;
if (/06:44/) {
  @op = @fol[1..$#fol -1];
  print "@op\n";
  }

I still enjoy - REALLY enjoy - filtering data and grabbing stats out of it. And what better than Perl - the Practical Extraction and Reporting Language. See example above.

* Read in a file line by line
* Delete out all HTML tags
* Find all references to the 06:44 train
* Output certain data about the running of the train from each reference

And that formed the basis of a charming little report shown here.

Want to learn Perl? We have a Perl Course running from 20th August 2007 ... and it's repeated every couple of months if you come to this thread in September or October.
(written 2007-08-03 07:45:37)

 P210 - Perl - Topicalization and Special Variables

Back to Linux run states, shell special commands, and directory structures

Previous and next or Horse's mouth home

Forward to Badges, Breakfasts and Trigger

Weymouth - Sunny Summer Sunday afternoon
DHCP automatic IP address v Static IP
Day trip to Weymouth
Badges, Breakfasts and Trigger
Pure Perl
Linux run states, shell special commands, and directory structures
Work and play at Well House Manor - Football and Shell Shortcuts
A wasted evening?
In the army, or in civvie street?
An update on the West Wilts show ...