Help for this page

Select Code to Download


  1. or download this
    
my $type = ($B1 =~ m/^\*/ or $B2 =~ m/^\*/) ? 'S' : 'I';