my ($input) = @_;