#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

my @in = ("Maria's", "Thano's");
my @out = map { s/'/"/g; $_ } @in;
print Dumper \@out;

__END__

$ perl test.pl
$VAR1 = [
          'Maria"s',
          'Thano"s'
        ];