Search Results

Search: Posts Made By: penchal_boddu
2,563
Posted By penchal_boddu
awk -F'[ -:]' '( NR>2) { print $(NF-6) , $(NF-1)...
awk -F'[ -:]' '( NR>2) { print $(NF-6) , $(NF-1) , $NF }' filename
2,563
Posted By penchal_boddu
for this specific case , searching of FIBRE may...
for this specific case , searching of FIBRE may solve the issue.
When searching on assignment for multiple devices , there can be devices mapped to SCSI ports or Mainframe ports . This might work...
985
Posted By penchal_boddu
in perl
in perl
1,641
Posted By penchal_boddu
$x="START|one|two|three|four|five|six|seven" ; ...
$x="START|one|two|three|four|five|six|seven" ;
$x=~s/((.*?\|){3})(.*?\|)/$1text|/;
print $x


START|one|two|text|four|five|six|seven
1,641
Posted By penchal_boddu
perl -lne 'BEGIN{$occurence = 3 }{ @out=split...
perl -lne 'BEGIN{$occurence = 3 }{ @out=split /\|/ ; $out[$occurence] = "here" ; print join "|" , @out } ' 123.txt
START|one|two|here|four|five|six|seven...
1,472
Posted By penchal_boddu

2,039
Posted By penchal_boddu
sed '/pgmId/a\ new_data' filename
sed '/pgmId/a\
new_data' filename
1,544
Posted By penchal_boddu
Thanks. Do you have any idea when this will...
Thanks.

Do you have any idea when this will happen and how 5.14 will resolve the issue.

My problem is that issue is not reproducable always. If i dont get the issue in 5.14 for many runs , i...
1,544
Posted By penchal_boddu
suitable perl version for windows 2008 64 bit
Hi ,

While executing perl scripts , sometimes cpu consumption is going to 100% and perl script is asking to abort.

In perl script , iam having some powershell commnands.

out of 10 times , 9...
1,695
Posted By penchal_boddu
awk '{if ( NF ==1 ) print }' filename
awk '{if ( NF ==1 ) print }' filename
5,953
Posted By penchal_boddu
Hi Pravin, perl -nle 'printf "$1\t" if...
Hi Pravin,

perl -nle 'printf "$1\t" if /unix="(.+?)"/>$/;print $1 if m/<body>(.*)<\/body>/;' input.xmls

I have two queries.

1. Is there any special reason why we are going for non-greddy...
2,024
Posted By penchal_boddu
Try awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ;...
Try

awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ; print }' 12.txt
3,845
Posted By penchal_boddu
if ( coloumn == "03/09/11") { split column...
if ( coloumn == "03/09/11")
{
split column 7 on ":" ;
take first element i.e hours
if ( hours > 6 )
print entire line
}
else
print entire line
3,845
Posted By penchal_boddu
awk '{if ( $6 == "03/09/11" ) {split($7,a,":") ;...
awk '{if ( $6 == "03/09/11" ) {split($7,a,":") ; if ( a[1] > 6 ){print}} else {print} }' filename
5
1,773
Posted By penchal_boddu
Thank to Scott and Harsha !!!
Thank to Scott and Harsha !!!
5
1,773
Posted By penchal_boddu
Hi Scott, when it is not quoted , then "wc"...
Hi Scott,

when it is not quoted , then "wc" should dispaly 4 right
5
1,773
Posted By penchal_boddu
Doubt
Hi ,

Struck with one basic question.

Iam expecting word count of 4 where "wc" is showing as 5 .

# echo "abcd" | wc
1 1 5

# echo abcd | wc
1 1 5
16,063
Posted By penchal_boddu
awk '{x=NF-1;print $x}' filename
awk '{x=NF-1;print $x}' filename
Forum: Solaris 05-07-2010
5,271
Posted By penchal_boddu
awk '{if ( $3 != name ){print $3 ; name=$3} print...
awk '{if ( $3 != name ){print $3 ; name=$3} print $9}' filename
1,568
Posted By penchal_boddu
Hi , I really doubt if we have multi line...
Hi ,

I really doubt if we have multi line comments in perl ( /* and */)

$line=q#var so = object.device.load('camera','value');#


This should do the prick for you
6,580
Posted By penchal_boddu
add '\' at end July|Month No. 7 ...
add '\' at end


July|Month No. 7
August|Month No. 8
September|Month No. 9
October|Month No. 10
November|Month No. 11
December|Month No. 12

Thanks,
penchal
7,460
Posted By penchal_boddu
first colum in descending and secong column in...
first colum in descending and secong column in asc

sort -k1,1nr -k2,2n filename
4,111
Posted By penchal_boddu
grab isql ouput in a file. sed "s#...
grab isql ouput in a file.

sed "s# *(\(.\).*#\1#" filename


Thanks,
penchal
1,685
Posted By penchal_boddu
[root]# perl -lane "BEGIN {...
[root]# perl -lane "BEGIN { open(FH,'file1');@con=<FH>;}print if grep(/@F[2]/,@con)" file2
rs3737728 1 1061338 A G 0.2845 0.2809 1.018

Thanks,
Penchal

---------- Post updated at 12:39 AM...
27,087
Posted By penchal_boddu
sed "s/\s*\|//g" filename
sed "s/\s*\|//g" filename
Showing results 1 to 25 of 172

 
All times are GMT -4. The time now is 03:18 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy