Select Code to Download

my $var='474627    asidase ta    sidase ala,"lpha-D- ctoside gtohydrol
+ase","razyme","arazyme    (enz Corp)","Melie","lagal","idase bta",   
+ rug    00103';

...
    print "$eachvar\n";
}

# Using s{}{} form of substitute.
# Substitute supports using several different separator formats
...
    # g = global
    # e = expression