my $string = <INPUT>;