my $contents= do { local($/); join '', };