Select Code to Download

Unrecognized escape \H passed through at Perl-1.pl line 22.
Unrecognized escape \P passed through at Perl-1.pl line 22.

use warnings;
use strict;