use strict; use warnings; my $abc = <