Search Results

Search: Posts Made By: penchal_boddu
2,409
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,409
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...
962
Posted By penchal_boddu
in perl
in perl
1,595
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,595
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,404
Posted By penchal_boddu

1,994
Posted By penchal_boddu
sed '/pgmId/a\ new_data' filename
sed '/pgmId/a\
new_data' filename
1,481
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,481
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,628
Posted By penchal_boddu
awk '{if ( NF ==1 ) print }' filename
awk '{if ( NF ==1 ) print }' filename
5,874
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,003
Posted By penchal_boddu
Try awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ;...
Try

awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ; print }' 12.txt
3,788
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,788
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,710
Posted By penchal_boddu
Thank to Scott and Harsha !!!
Thank to Scott and Harsha !!!
5
1,710
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,710
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,833
Posted By penchal_boddu
awk '{x=NF-1;print $x}' filename
awk '{x=NF-1;print $x}' filename
Forum: Solaris 05-07-2010
5,200
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,534
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,538
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,407
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,052
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,633
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,924
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 02:41 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy