$/ = undef;
my $text = <$in>;