#!/usr/bin/perl -spi if( $found and /^$/ ){ print < LPRngLogo ifhp ifhp EOF $found = 0; } elsif( m,