Help for this page

Select Code to Download

Select or download this

#! /usr/bin/env perl

...

$string =~ tr/УТФ/"'"/;
print $string . "\n";