print STDOUT "stuff\n";
print STDERR "stuff\n";
chomp(my $stuff = <STDIN>);