depends what "incorporated" means ..

does this need to be invoked from inside another script? if so obviously just can't copy/paste verbatim (could dump it in a system call, though maybe not ideal method) ..

or does this just need to be called right before/after another perl script? if so, could just wrap the two calls in a shell script ...

otherwise, write a sub that sets $^I, @ARGV, $/, and runs the loop that -n or -p does (see perlrun)