my $text; { local $/; $text = <DATA>; }