'<pagebreak>',
'&', quotemeta("\n"),
'"', '\$', '%', '_', '#', quotemeta('^'),
- '{', '}', '<', '>', '£', "\r", '±',
+ '{', '}', '<', '>', '£', "\r", '±', '\xe1',
],
quotemeta("\\") => '\\textbackslash ',
'<pagebreak>' => '',
'£' => '\pounds ',
"\r" => "",
'±' => '$\pm$',
+ '\xe1' => '$\bullet$',
quotemeta('^') => '\^\\',
quotemeta("\n") => '\newline '
);
$variable =~ s/\$\<\$${key}\$\>\$(.*?)\$<\$\/${key}\$>\$/\\${new}\{$1\}/gi;
}
+ $variable =~ s/[\x00-\x1f]//g;
+
return $variable;
}