[CentOS] remove newlines / perl /concise example
Stephen Harris
lists at spuddy.org
Sat Jan 1 16:56:06 UTC 2011
On Sat, Jan 01, 2011 at 03:42:46PM +0000, Dave Cross wrote:
> Code like this is often simpler if you use the Unix filter model and
> let the operating system take care of opening all the files.
>
> #!/usr/bin/env perl
>
> use strict;
> use warnings;
>
> chomp(my @lines = <>);
>
> print @lines;
That's one way of using up a lot of memory.
> If this is in a file called 'join', you can run it like this:
>
> $ ./join < input.txt > output.txt
Use the tools you've already got as part of the OS install:
/usr/bin/tr -d '\012' < input.txt > output.txt
--
rgds
Stephen
More information about the CentOS
mailing list