Help for this page

Select Code to Download

Select or download this

my @compounds=("C3H8O2",
           "C6H10O5",
...
         grep { $_ =~ /P/} 
         @compounds
),"\n";