Re^2: replacing equal to operator

[hippo]

I came up with the same approach but you don't even need that $ because the dot doesn't match the newline by default.

use strict;
use warnings;

use Test::More tests => 1;

my $have = qq#parameter=TO_DATE('1900-01-01','YYYY-MM-DD')\n#;
my $want = qq#parameter="TO_DATE('1900-01-01','YYYY-MM-DD')"\n#;

$have =~ s/=(.*)/="$1"/;
is $have, $want;