Hello,
Can you explain why in the first 2 commands the awk does not print anything? Is it looking of a specific format ?
Thanks.
$ echo 12a3 | awk '($1>=2) {print $1}' # prints nothing
$ echo 123a | awk '($1>=2) {print $1}' # prints nothing
$ echo a123 | awk '($1>=2) {print $1}'
a123... (1 Reply)
Hi Everyone,
# cat 1
1;2;3;4;5;6
1;2;3;4;5;
# awk -F ";" '$5 == "5"' 1
1;2;3;4;5;6
1;2;3;4;5;
but the output is should be just "1;2;3;4;5;6" means 1st condition: $5 is 5; 2nd condition: $6 is not empty, please advice. Thanks (2 Replies)
Hi there, here is my command
ssh host.local "/path/to/my/perscript/hostconfig.pl -s $HOST -d |awk '{if (\$4 > 120)print \"My error message\";exit}{s=0; for (i=1; i<=NF; i++) s++; if(s == 13) print \$3}'"
The problem is if conditional 1 is met (i.e $4 > 120), i don't see "My error message", the... (5 Replies)
Hi All,
I have a file with below contents.
"en2"/10.185.81.0:cluster_interconnect,"en5"/10.185.81.0:cluster_interconnect,"en6"/169.181.146.0:public
I want to take the interface name from the file and convert it as ipaddress using ifconfig command get the output like below
en6 ->... (2 Replies)
I'm having a problem pulling UID's from data. The data outputs a user's UID in one of three ways:
1. Error User user_name already assigned with <UID>
2. Success <UID> reserved for user_name
3. <a load of crap because there was a db failure yet somehow the UID is still in there>
I typically... (5 Replies)
Hello Friends,
I need to find some CDRs in production servers whose 1st field value and 2nd field value = 1 and 11th looks like 45.123... where there are more than 3 digits after comma.so i wrote a one liner, something like below but does not work, however when i used first and second conditions... (8 Replies)
Hi
I've been trying to get this to work but so far no luck.
#!/usr/bin/ksh
unset EXP
APP=$1
EXP=`sed -n "/${APP}/p" tIclrpt.out |awk '{print $7}'|sed '/^$/d'`
EXT=`sed -n "/${i}/p" ${SESLOG} |awk '{print $4}'|grep "${i}"`
EXEM=/path/to/fail
ACTI=/path/to/success
if ||
then... (10 Replies)
Hi All ,
I am having a file like this
INPUT FILE
###############################
addfd_mjlala kksks sksks ks
annsns_bbox_2 (sksksk ksks )
adnndn_nsns_bbox_3 (( jsjsdj sjsj )
malm_dkdm lsls lsl
mdndk_mkmd_dkd_bbox_4_kdkd
ksksk skksk_bbox_jsj_KSK ((jsjsj jsjsj )... (2 Replies)
Discussion started by: kshitij
2 Replies
LEARN ABOUT DEBIAN
gd::barcode::nw7
Barcode::NW7(3pm) User Contributed Perl Documentation Barcode::NW7(3pm)NAME
GD::Barcode::NW7 - Create NW7 barcode image with GD
SYNOPSIS
ex. CGI
use GD::Barcode::NW7;
binmode(STDOUT);
print "Content-Type: image/png
";
print GD::Barcode::NW7->new('123456789012')->plot->png;
with Error Check
my $oGdBar = GD::Barcode::NW7->new('123456789E');
die $GD::Barcode::NW7::errStr unless($oGdBar); #Invalid Characters
DESCRIPTION
GD::Barcode::NW7 is a subclass of GD::Barcode and allows you to create NW7 barcode image with GD. This module based on "Generate Barcode
Ver 1.02 By Shisei Hanai 97/08/22".
new
$oGdBar = GD::Barcode::NW7->new($sTxt);
Constructor. Creates a GD::Barcode::NW7 object for $sTxt. $sTxt has variable length string with (0-9, - $ / . + ABCD).
plot()
$oGd = $oGdBar->plot([Height => $iHeight, NoText => 0 | 1]);
creates GD object with barcode image for the $sTxt specified at new method. $iHeight is height of the image. If NoText is 1, the image has
no text image of $sTxt.
ex.
my $oGdB = GD::Barcode::NW7->new('123456789012');
my $oGD = $oGdB->plot(NoText=>1, Height => 20);
# $sGD is a GD image with Height=>20 pixels, with no text.
barcode()
$sPtn = $oGdBar->barcode();
returns a barcode pattern in string with '1' and '0'. '1' means black, '0' means white.
ex.
my $oGdB = GD::Barcode::NW7->new('123456789012');
my $sPtn = $oGdB->barcode();
# $sPtn = '';
$errStr
$GD::Barcode::NW7::errStr
has error message.
$text
$oGdBar->{$text}
has barcode text based on $sTxt specified in new method.
AUTHOR
Kawai Takanori GCD00051@nifty.ne.jp
COPYRIGHT
The GD::Barocde::NW7 module is Copyright (c) 2000 Kawai Takanori. Japan. All rights reserved.
You may distribute under the terms of either the GNU General Public License or the Artistic License, as specified in the Perl README file.
SEE ALSO
GD::Barcode
perl v5.12.3 2003-05-29 Barcode::NW7(3pm)