*! = 1; "text" =~ /.(..)/; print "$!\n"; __END__ ex