my $input = <>;