while ($line = <>) {
    ... work with $line here ...
}




-----------------------------------------------------------------------------
Copyright 1997-2024 Jeffrey Friedl