Select Code to Download

#!/usr/bin/perl -w
use 5.011;
use utf8;
...
say $stop;
say bork($stop);
__END__

$ ./1.bork.pl 
Thees ees zee cunjooncshun jooncshun.  Bork Bork Bork!
Many think judge's nomination will lead restriction abortion.
Muny theenk joodgea's numeenashun veell lead restreecshun aburshun.  B
+ork Bork Bork!
$