Господа, как такой простой перл-скрипт реализовать на Парсере?

ISO 24.10.2002 14:19

#!/usr/bin/perl
print "Content-type: text/html\n\n";

read(STDIN,$buffer,$ENV{'CONTENT_LENGTH'});
$FileName="in.dat";
if(open(handle,">>$FileName")){
	print handle $buffer;
	close(handle);
}