'Process hour' presentation slideshows

$a99a = '([a-z])(\d)\2\1'; # matches a11a, g22g, x33x, etc.

$a99a = '([a-z])(d)21'; # matches a11a, g22g, x33x, etc. $line = "code=e99e"; if ($line =~ /^(w+)=$a99a$/){ # unexpected behavior! print "$1 is valid "; } else { print "bad line: '$line' "; } $a99a = '([a-z])(d)g{-1}g{-2}'; # safe for being interpolated.

240 views • 17 slides