Hi,
# grep "^Listen" httpd.conf | awk '{print $2}'
FrontEnd_1_IP:8081
FrontEnd_2_IP:8081
8081
8082
8083
#
I need to get the values one at a time but I just can't manage to do that.
Thanks,
Bianca (20 Replies)
I have this input file
0FB7,1083,Synchronized,FriNov121655,2816_7RAID5,05F:1_10F:1,10000000NoneNone,DC_db00p01
0FB7,1150,Split,MonApr180658,2816_7R5GC,N/A,N/A,N/A
06C4,0710,Synchronized,WedMar91105,2816_7RAID5,04E:1_11E:1,10000000NoneNone,DL_nb00p25... (1 Reply)
Hi guys,
i am trying to analyze a text file using awk and am not able to solve this issue.
This is the piece of code that I have written
BEGIN {
## Time to count MACs -> 5 seconds.
TIME_LIMIT = 5;
k = 50000;
}
## For every line.
{
time_in_seconds = $1... (2 Replies)
Hi Gurus,
I am facing a similar issue usiung an awk command. Below is my requirement:
---DATA---
A;F;G
A;D;E
A;D;E
B;Z;P
C;Z;Q
Expected:
A
F<TAB>G
D<TAB>E
D<TAB>E
B
D<TAB>E (1 Reply)
Hi all,
i am trying to use below command to see the output of hardware inventory, but i only see 2 first line no output of the command.
awk '/Hardware/ {print $0}' XXX_result.txt
Hardware inventory:
Hardware inventory:
any idea how to see whatever is under hardware inventory.
i... (11 Replies)
Hi All,
I am using the below script which has awk command, but it is not returing the expected result. can some pls help me to correct the command.
The below script sample.ksh should give the result if the value of last 4 digits in the variable NM matches with the variable value DAT. The... (7 Replies)
On AIX 5.3 and AIX 6.1, I have this script for checking printers being pingable or not.
for i in `lsallq`
do
echo "Queue Name: " $i
echo "----------------------------------------"
for j in `lsallqdev -q $i`
do
echo " Device Name:" $j
hname=`echo... (3 Replies)
OK, so I am trying to use awk as a method of accessing a table stored in a file to then provide the capability of a look up table.
The table is stored in a file named "/Users/jhaney/Desktop/assetTypeMapping.tsv" and looks like this:
aCategory aLetter aNumber
AssetCat1 A 123 ... (10 Replies)
Discussion started by: jhaneyzz
10 Replies
LEARN ABOUT DEBIAN
vcs::lite::delta
VCS::Lite::Delta(3pm) User Contributed Perl Documentation VCS::Lite::Delta(3pm)NAME
VCS::Lite::Delta - VCS::Lite differences
SYNOPSIS
use VCS::Lite;
# diff
my $lit = VCS::Lite->new('/home/me/foo1.txt');
my $lit2 = VCS::Lite->new('/home/me/foo2.txt');
my $difftxt = $lit->delta($lit2)->diff;
print OUTFILE $difftxt;
# patch
my $delt = VCS::Lite::Delta->new('/home/me/patch.diff');
my $lit3 = $lit->patch($delt);
print OUTFILE $lit3->text;
DESCRIPTION
This module provides a Delta class for the differencing functionality of VCS::Lite
API
new
The underlying object of VCS::Lite::Delta is an array of difference chunks (hunks) such as that returned by Algorithm::Diff.
The constructor takes the following forms:
my $delt = VCS::Lite::Delta->new( '/my/file.diff',$sep); # File name
my $delt = VCS::Lite::Delta->new( *FILE,$sep); # File handle
my $delt = VCS::Lite::Delta->new( $string,$sep); # String as scalar ref
my $delt = VCS::Lite::Delta->new( @foo, $id1, $id2) # Array ref
$sep here is a regexp by which to split strings into tokens. The default is to use the natural perl mechanism of $/ (which is emulated
when not reading from a file). The arrayref form is assuming an array of hunks such as the output from Algorithm::Diff::diff.
The other forms assume the input is the text form of a diff listing, either in diff format, or in unified format. The input is parsed, and
errors are reported.
diff
print OUTFILE $delt->diff
This generates a standard diff format, for example:
4c4 < Now wherefore stopp'st thou me? --- > Now wherefore stoppest thou me?
udiff
print OUTFILE $delt->udiff
This generates a unified diff (like diff -u) similar to the form in which patches are submitted.
id
my ($id1,$id2) = $delt->id;
$delt2->id('foo.pl@@1','foo.pl@@3')
The id method allows get and set of the names associated with the two elements being diffed. The id is set for delta objects returned by
VCS::Lite->diff, to the element IDs of the VCS::Lite objects being diffed.
Diff format omits the file names, hence the IDs will not be populated by new. This is not the case with diff -u format, which includes the
file names which are passed in and available as IDs.
hunks
my @hunklist = $delt->hunks
A hunk is a technical term for a section of input containing a difference. Each hunk is an arrayref, containing the block of lines. Each
line is itself an arrayref, for example:
[
[ '+', 9, 'use Acme::Foo;'],
[ '-', 9, 'use Acme::Bar;'],
]
See the documentation on Algorithm::Diff for more details of this structure.
BUGS, PATCHES & FIXES
There are no known bugs at the time of this release. However, if you spot a bug or are experiencing difficulties that are not explained
within the POD documentation, please send an email to barbie@cpan.org or submit a bug to the RT system (see link below). However, it would
help greatly if you are able to pinpoint problems or even supply a patch.
http://rt.cpan.org/Public/Dist/Display.html?Name=VCS-Lite
Fixes are dependant upon their severity and my availablity. Should a fix not be forthcoming, please feel free to (politely) remind me.
AUTHOR
Original Author: Ivor Williams (RIP) 2008-2009
Current Maintainer: Barbie <barbie@cpan.org> 2009
COPYRIGHT
Copyright (c) Ivor Williams, 2002-2006
Copyright (c) Barbie, 2009
LICENCE
You may use, modify and distribute this module under the same terms as Perl itself.
SEE ALSO
Algorithm::Diff.
perl v5.10.1 2009-10-25 VCS::Lite::Delta(3pm)