Help for this page

Select Code to Download


  1. or download this
    #! perl -sw
use strict;
...
ChemBankID: 1568
CompoundName: (+)-methamphetamine
MicroSource Catalog: 1900033
  2. or download this
    #! perl -sw
use strict;
...
local $/ = "\n> <";

m[([^>]+)>\n(.*)]sm and print "$1\n$2\n---------\n" while <STDIN>;
  3. or download this
    P:\test>perl 330148.pl < 330148.dat
$NAM
...
> <
---------
....truncated for posting....