@Lines = split(m/^/m, $lines);




-----------------------------------------------------------------------------
Copyright 1997-2025 Jeffrey Friedl