Aditi Gupta wrote:
Hi Perlers,
Hello,
I have a file as follows:
#block1
aaa
aaa
#block2
bbb
bbb
#block3
ccc
ccc
and i want to append(or i should say merge) these blocks and get a file like
this:
aaabbbccc
aaabbbccc
how can this be done using perl?
please help..
$ echo "
aaa
aaa
bbb
bbb
ccc
ccc
" | perl -l -00ne'my $i; $x[ $i++ ] .= $_ for split /\n/ }{ print for @x'
aaabbbccc
aaabbbccc
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>