Help for this page
line1 line2 ... line4 line6
line1 line2 line4 line6
open(FILE, "<$MODFILE") || die "File not found"; my @lines = <FILE>; ... $_ =~ s/\n\n+/\n/g; push(@newlines,$_); }