$string =~ /\A(.*)\z/s or die; $string = $1;