#!/usr/bin/perl while (<>) { if ( m#^2.6.\d+/2.6.\d+-mm\d+/(2.6.\d+-mm\d+).bz2# ) { print "oooh! $1 is released!\n"; } if ( m#^2.6.\d+/patch-(2.6.\d+-mjb\d+).bz2# ) { print "oooh! $1 is released!\n"; } if ( m#^linux-(2.6.\d+(-rc\d+)?).tar.bz2# ) { print "oooh! $1 is released!\n"; } }