my $foo = <>;
if ($foo eq "bar") {

}