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