BOL: Perl script to read the next line of a file !

BioScripts
Abhi
Perl script to read the next line of a file !

Perl script to read the next line of a file !

By Abhi 800 days ago

my $line = <$fileHandler>;
while(1) { # keep looping until I say so
    my $nextLine = <$fileHandler>;

    if ($line =~ m/>/ || !defined $nextLine) {
        ### Do the stuff
    }
    ### Do any other stuff;

    last unless defined $nextLine;
    $line = $nextLine;
}