[Programación] sed--->perl, ayuda

[Horacio Castellini]

Hola, alguien me puede dar una mano de como trasformo estas sustituciones en 
sed (stream editor) a perl? es decir como manejo las expresiones regulares 
para obtener igual resultado...

#!/bin/sh
zcat $1|sed 's/=?iso-8859-1?//g;s/q?//g;s/Q?//g' >$A
cat $A|sed 's/=A1//g;s/=0D//g;s/Re://g;s/RE://g' >$B
cat $B|sed 's/RV://g;s/Re\[[1-9]\]://g;s/=?ISO-8859-1?//g' >$A
cat $A|sed 's/\"//g;s/_//g;s/=?windows-1252?//g' >$B
cat $B|sed 's/=?utf-8?//g;s/=?us-ascii?//g;s/\[windows-1252\]//g' >$A
cat $A|sed 's/=?iso-8859-15?//g;s/{Spam?}//g;s/(//g;s/)//g' >$B
# Coloca acentos y otros...
cat $A|sed 's/=E1/á/g;s/=E9/é/g;s/=ED/í/g;s/=F3/ó/g'>$B
cat $B|sed 's/=F1/ń/g;s/=C3/á/g;s/=FA/ú/g'|tr -s \  

Chas gracias Horacio...