Help for this page

Select Code to Download


  1. or download this
    
> comment
...
21 25 27 38
40 41 43 50
  2. or download this
    while ( <INFILE> ) {
    next if ($_ =~ /^(\>)/);
...
}
  3. or download this
    @arr = (10, 12, 18, 20,21, 25, 27, 38,40, 41, 43, 50)
  4. or download this
    my @arr;
foreach (@dat) {
  my @a = split(//,$_);
  @arr =  (@arr, @a);
}