I have 3 file, each of has got 80000 records.
file1.txt
-----------------------
ABC001;active;modify;accept;
ABC002;notactive;modify;accept;
ABC003;notactive;no-modify;accept;
ABC004;active;modify;accept;
ABC005;active;no-modify;accept;
file2.txt
---------------------------... (8 Replies)
Hi,
Can anyone know how to use perl to merge the following multi-line information which beginning with "BAM" into one line. For each line need to delete the return and add a space. Please see the red color line.
******Org. Multi-line)
BAM admin 101.203.57.22 ... (3 Replies)
Hi,
lets assume the following details..
file 1 has below details
abc|1234|xyz
abc1|1234|xyz1
abc2|1234|xyz2
and file 2 has below details
pqr|124|lskd
ebwer|325|dfb
wf|234|sdb
I need out put shown below
abc|1234|xyz
pqr|124|lskd
abc1|1234|xyz1
ebwer|325|dfb
abc2|1234|xyz2... (4 Replies)
Hi all,
I've been looking for a way to merge 2 simple text files, line by line using the shell:
For example:
File1:
aaaa
bbbb
cccc
File2:
1111
2222
3333
The 2 files have the same number of lines.
I'm trying to obtain:
aaaa 1111
bbbb 2222
cccc 3333 (0 Replies)
Hello everybody,
I'm trying to merge a lot of files, but I want to include the filename to the end of each line. I've tried to use cat, but I got stuck.
My files are for example:
file01.001
123456 aaa ddd ee
458741 eee fff ee
file02.003
478596 uuu ddd ee
145269 ttt fff ee
... (4 Replies)
Hello,
I have 800 or so files with 3 columns each and >10000 lines each.
For each file and each line I would like to print the maximum column number for each line. Then I would like to 'paste' each of these files together (column-wise) so that the file with expression in label '_1' is the... (6 Replies)
Hi All,
I have two files having oracle query result. I want to merge to files line by line and also with column
File1
23577|SYNC TYPE
23578|Order Number|ConnectionState
23585|Service State|Service NameFile2
23577|AR Alarm Sync
23578|A5499|9
23585|7|test_nov7Result... (18 Replies)
example:
comment Now_TB.table column errac is for error messages
1 - first
2 - second
3 -third ;
in this example I need to be able to grab the comment as first word and ; as the last word and it might span a few lines. I need it to be put all in one line without line breaks so I can... (4 Replies)
Hello,
i want to merge two files via terminal. After three lines of file one i will append a line of file two:
Example:
File 1:
@chr1_15953153_15953093_1_0_0_0_1:0:0_0:0:0_0/1
TGTCGTAAAATCACAACGTCCCCATCTTTCAAGCCATAAGCAGCCAATGATCTGTGGTTGTCTGTGAGAGGTCTTTCCGCATAGACGATCTACAACAAGA
+... (3 Replies)
Hello.
I try to merge few /etc/qconfig files in AIX (from few servers into one file on new server).
Could you please help me what would be the best way to merge files that contain multi-line stanzas, like this:
stanza1:
attr1 = value1
attr2 = value2
attr3 = value3
stanza2:
attr1 =... (7 Replies)
Discussion started by: kareem33
7 Replies
LEARN ABOUT MOJAVE
moose::autobox::code5.18
Moose::Autobox::Code(3) User Contributed Perl Documentation Moose::Autobox::Code(3)NAME
Moose::Autobox::Code - the Code role
SYNOPOSIS
use Moose::Autobox;
my $adder = sub { $_[0] + $_[1] };
my $add_2 = $adder->curry(2);
$add_2->(2); # returns 4
# create a recursive subroutine
# using the Y combinator
*factorial = sub {
my $f = shift;
sub {
my $n = shift;
return 1 if $n < 2;
return $n * $f->($n - 1);
}
}->y;
factorial(10) # returns 3628800
DESCRIPTION
This is a role to describe operations on the Code type.
METHODS
curry (@values)
rcurry (@values)
conjoin (&sub)
disjoin (&sub)
compose (@subs)
This will take a list of @subs and compose them all into a single subroutine where the output of one sub will be the input of another.
y This implements the Y combinator.
u This implements the U combinator.
meta
SEE ALSO
<http://en.wikipedia.org/wiki/Fixed_point_combinator>
<http://blade.nagaokaut.ac.jp/cgi-bin/scat.rb/ruby/ruby-talk/20469>
BUGS
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to
cpan-RT.
AUTHOR
Stevan Little <stevan@iinteractive.com>
COPYRIGHT AND LICENSE
Copyright 2006-2008 by Infinity Interactive, Inc.
<http://www.iinteractive.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.18.2 2013-10-27 Moose::Autobox::Code(3)