[CentOS] remove newlines / perl /concise example

Sat Jan 1 15:42:46 UTC 2011
Dave Cross <davorg at gmail.com>

On 30 December 2010 21:57, ken <gebser at mousecar.com> wrote:
> Thanks for the previous tips and suggestions.  Here's a more concise
> example:
> Input file:
> <aaaa>
> <bbbb>
> <cccc>
> <dddd>
> I want everything on one line, i.e., remove all newlines.  Like so:
> <aaaa><bbbb><cccc><dddd>
> Simple perl code:

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;

If this is in a file called 'join', you can run it like this:

 $ ./join < input.txt > output.txt



Dave Cross :: dave at dave.org.uk