Search Results

Search: Posts Made By: penchal_boddu
2,458
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,458
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...
969
Posted By penchal_boddu
in perl
in perl
1,608
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,608
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,430
Posted By penchal_boddu

2,010
Posted By penchal_boddu
sed '/pgmId/a\ new_data' filename
sed '/pgmId/a\
new_data' filename
1,491
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,491
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,647
Posted By penchal_boddu
awk '{if ( NF ==1 ) print }' filename
awk '{if ( NF ==1 ) print }' filename
5,899
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,009
Posted By penchal_boddu
Try awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ;...
Try

awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ; print }' 12.txt
3,799
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,799
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,721
Posted By penchal_boddu
Thank to Scott and Harsha !!!
Thank to Scott and Harsha !!!
5
1,721
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,721
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
15,930
Posted By penchal_boddu
awk '{x=NF-1;print $x}' filename
awk '{x=NF-1;print $x}' filename
Forum: Solaris 05-07-2010
5,232
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,536
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,550
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,445
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,068
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,649
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...
26,984
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 11:43 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy