Help for this page

Select Code to Download


  1. or download this
    while ($newline = <FILEHANDLE>){
  2. or download this
    use strict;
use warnings;
  3. or download this
    while (my $newline = <FILEHANDLE>){
  4. or download this
       if ($newline = /^>/) {
  5. or download this
       if ($newline =~ /^>/) {
  6. or download this
      $stuff = $newline;
  &play_with($stuff);