Select Code to Download

$ perl -l snafu
$ NAME : corry
$$.Inc s d
...
G1 ty n1 EE EE M T1 T2 $$SRU
G2 n1 y OO OO M T3 T4 $$SRU
.EON

#!/usr/bin/perl --
use warnings;
use strict;
...
G1 td n3 EE EE M T5 T6 $$SRU    
G2 n3 y OO OO M T7 T8 $$SRU  
.EON