Select Code to Download

c:\@Work\Perl>perl -wMstrict -MO=Deparse,-p -le
"! $_ =~ /;\s+/;
...
use strict 'refs';
((!$_) =~ /;\s+/);
-e syntax OK

! ($_ =~ /;\s+/);
# or
$_ !~ /;\s+/;