Consulta Expresion Regular

[aloqui]

Prueba con ésto, a mí me ha funcionado:

Código:

#!/usr/bin/perl
use strict;
my $frase = "la casa del casamiento es linda. La CASA se ve de lejos";
$frase =~ s/casa/xxxx/gi;
print "frase='$frase'\n";