#!/usr/bin/perl -w
use strict;$/="__DATA__";@_=<DATA>;
chomp(@_);$/="\n";chomp(@_);
map{s/\n|\s+//g}@_;$,=" ";
print @_;

__DATA__
  just
__DATA__
 another
__DATA__
  perl
__DATA__
 hacker