I found this php script linked at HotScripts (I think). There isn't much more info on the site, but this code works well, if you don't know Perl, this might be a better option for you.
<BLOCKQUOTE><font size="1" face="Verdana,Arial,Helvetica">code:</font><HR><pre><?
/* Start Quoter Code
'Quoter' Script By: JbA
Web Address: http://www.4cm.com/
Email Address: firstname.lastname@example.org
Use of this code is allowed, free, and offered
as long as you email me with the URL of the page
your using it on!
It is offered 'AS IS', and I take no claim (responsibility!)
that it will work, or that it won't screw up your system!
$file = fopen("http://www.4cm.com", "r");
$rf = fread($file, 20000);
$grab = eregi("BEFORE CODE(.*)AFTER CODE";
$printing = str_replace("#cccc99", "white", $printing);
# Please Be Aware That Most Web Sites Consider It Against The Law
# To "Grab" information/data from their Web Site. I (www.4cm.com)
# am not responsible for getting permission either! - JbA
# These four (4) lines maybe removed without breach of Rights Of Use!