Select Code to Download

my $fixed = $ptext;
$fixed =~ s/^['"]//;
$fixed =~ s/['"]\z//;
$fixed = quotemeta($fixed);

my $fixed = $ptext;
$fixed =~ s/^['"]//;
$fixed =~ s/['"]\z//;
$fixed =~ s/([\\'"...])/\\$1/g;