my $input = <STDIN>;