(removes blank lines) perl -pi -e 's/^$/BLANK/s ; s/^BLANK.*//s' pword (creates blank line) perl -pi -e 's/User1.*//g' /etc/passwd (removes the line with User2&User1 and does not leave a blank line) perl -pi -e 's/User2.*//s ; s/User1.*//s' pword (removes blank line - single replacement) perl -pi -e 's/User1.*//s' pword (removes blank line as well) perl -pi -e 's/^$/#/s ; s/^#.*//s' pword (removes blank line with spaces or tabs) perl -pi -e 's/^[ ]*$/#/s ; s/^#.*//s' pword ~ "Sep05-db-info.txt" 1525 lines, 38124 characters ------------------------------------------- root@backupserver [/root/BackupDatabaseInfo] ------------------------------------------- --> perl -pi -e 's/^[ ]*$/#/s ; s/^#.*//s' Sep05-db-info.txt ------------------------------------------- root@backupserver [/root/BackupDatabaseInfo] ------------------------------------------- --> cat Sep05-db-info.txt | wc -l 1461