Search Results

Search: Posts Made By: penchal_boddu
2,523
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,523
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...
980
Posted By penchal_boddu
in perl
in perl
1,626
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,626
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,456
Posted By penchal_boddu

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

awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ; print }' 12.txt
3,825
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,825
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,762
Posted By penchal_boddu
Thank to Scott and Harsha !!!
Thank to Scott and Harsha !!!
5
1,762
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,762
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,005
Posted By penchal_boddu
awk '{x=NF-1;print $x}' filename
awk '{x=NF-1;print $x}' filename
Forum: Solaris 05-07-2010
5,260
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,551
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,562
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,453
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,096
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,664
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,048
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 06:10 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy