Search Results

Search: Posts Made By: penchal_boddu
2,658
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,658
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...
999
Posted By penchal_boddu
in perl
in perl
1,687
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,687
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,542
Posted By penchal_boddu

2,104
Posted By penchal_boddu
sed '/pgmId/a\ new_data' filename
sed '/pgmId/a\
new_data' filename
1,628
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,628
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,751
Posted By penchal_boddu
awk '{if ( NF ==1 ) print }' filename
awk '{if ( NF ==1 ) print }' filename
6,033
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,054
Posted By penchal_boddu
Try awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ;...
Try

awk 'BEGIN{i=1} !/^$/{ gsub("p",i++) ; print }' 12.txt
3,924
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,924
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,847
Posted By penchal_boddu
Thank to Scott and Harsha !!!
Thank to Scott and Harsha !!!
5
1,847
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,847
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,250
Posted By penchal_boddu
awk '{x=NF-1;print $x}' filename
awk '{x=NF-1;print $x}' filename
Forum: Solaris 05-07-2010
5,334
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,642
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,644
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,513
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,177
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,728
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,358
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 07:23 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy