my $data; do {local $/; $data = <FILE> };