¿Qué es lo que quieres imprimir dentro del archivo mother.pl? Porque a ligeras, no se entiende lo que deseas hacer, sé más explicito...
Ahora, no es necesario "evitar" los
quotes ' y
", me refiero el operador qq// funciona de modo que no exista ambigüedad ni tampoco necesidad de escapar ninguna comilla. Por ejemplo:
Using perl Syntax Highlighting
#!/usr/bin/perl
my $test = qq/
my $probar = \"'test'\";
print $probar;
/;
print $test;
open(O,">>mother.pl");
print O $test;
close O;
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
Fíjate que estoy escapando las comillas dobles, y delimitándolo con el carácter "\". Sin embargo se obtiene el mismo resultado que el tuyo.
P.D.: ¡¡epa!! Parece que el
syntax de Perl del foro (el coloreado) no lo hace bien, pero fíjate de correr ese código en la terminal que te lleva al mismo resultado.