Shell Programming and Scripting

pareshan:

your bdf output is trying to squeeze itself down to fit your teminal width. try piping it through 'grep ^ ' such as:

Code:

bdf |grep ^

otherwise, if there's additional spaces causing you problems, you can also pipe the above output through tr to squeeze out spaces too:

Code:

bdf |grep ^ |tr -s [:space:]

lastly, if you'd really want to get wild, you pipe all of the above into Rahul's earlier awk script too (although it might be somewhat slower, and less resilient for errors, than sqlldr if there's too many records). sqlldr is nice in that it ensures at least a basic transaction commit level...and since it creates a bad file, etc, it's helpful when the script might be supported by additional folks:

Code:

bdf |grep ^ |tr -s [:space:] |awk -v serv=$server '
{print "insert into table1 values (~" serv "~,~" $1 "~,~" $6 "~," $2 "," $3 "," $4 "," $5 " );" }
' | sed -e "s/~/'/g" -e 's/%//' > $sqlfile

Thanks alot but nothign really working out here.

I think I can do rest if i get solution of just this one as I mentioned below

while im doing bdf if the output is in two lines then i want to shift that in one line rest removing spaces and all i can do it using perl. Just you can see some of them are in one line and some of then are in two lines just i need help with those whose result came in two lines. something like if the value is in two lines then shift it to one line and im not able to implement it thats my problem. can be in ksh or perl i dont care.

If I can change all the outputs which are like this
/dev/vghome_old/lvol1
23552000 10375127 12353732 46% /usr/local/g1/dev/vgapp02/lvol1

into this kind of outputs like the other ones
/dev/vgapp/lvol9 25624576 23454180 2138564 92% /mps
then rest that oracle and deleting extra spaces I can handle.. just I need help in this one.



bdf_output

/dev/vg3psw/lvol9 5120000 1286387 3594077 26% /usr/local/g1_3.2_SE
/dev/vghome_old/lvol1
23552000 10375127 12353732 46% /usr/local/g1/dev/vgapp02/lvol1 153616384 100802161 49543296 67% /tuxappl
/dev/vg00/lvol6 1540096 44424 1488456 3% /tmp
/dev/vgapp-io/lvol1
199155712 153617264 45361864 77% /tlgvar
/dev/vgapp/lvol3 2097152 24344 2056680 1% /opcode
/dev/vgapp/lvol9 25624576 23454180 2138564 92% /mps
/dev/vghome_old/lvol5
5144576 185360 4649319 4% /lsms_tool
/dev/vgapp-io/lvol2
2097152 5208 2075800 0% /logs
/dev/vgdbcommon/lvol1
18432000 1517936 16786512 8% /logs/ORACLE
/dev/vghome/lvol1 62898176 54860264 8037912 87% /home
/dev/vgapp/lvol8 524288 290587 219125 57% /emc
/dev/vgd2bl12d_2/lvol3
20512768 6129 19224982 0% /csmtier1/logs
/dev/vgapp/lvol10 1048576 6334 977155 1% /csmscripts
/dev/vghome_old/lvol6
51707904 3864 51300112 0% /ora_D2BL12B_4

/dev/vg27/lvol3 204865536 197661672 7147648 97% /ora_D2BL42A_3
/dev/vg27/lvol2 307232768 26120 304806672 0% /ora_D2BL42B_2
/dev/vg27/lvol1 307232768 287320072 19757192 94% /ora_D2BL43A_2
/dev/vg27/lvol4 20578304 9825080 10669224 48% /ora_fbf_1

Just you can see some of them are in one line and some of then are in two lines just i need help with those whose result came in two lines. something like if the value is in two lines then shift it to one line and im not able to implement it thats my problem. can be in ksh or perl i dont care


thanks alot
help plz

I found the solution now and I solved it and correct code is


#!//opt/perl/bin/perl
use strict;
use warnings;
my ($filesystem);
foreach (qx(bdf)) { ##executing bdf command here
next if/^Filesystem/; ##Skip the header line
if(!/%/) { ##remember on next line if no percentage on this line
chomp; ##clean up the new line
$filesystem = $_; ## remember
next;
}
$_ = $filesystem . $_ if /^\s/; ## add filesystem for wrapped lines
#next if /^\w+:/; #skip NFS mount with ":" in first word ##To skip the NFS mount
#chomp;
s/% / /; ## strip percentage sign
s/\s+/ /g; ## replace all tabs and spaces with just 1 space
my ($fs, $kbytes, $used, $avail, $pct_used, $mount) = split; ## now have each column
in a variable
## do anything you like with the columns (like preparing an oracle insert)
##print $_, "\n" ; # just to prove new glued line
##print qq(fs=$fs used=$pct_used \n);
print qq($fs $kbytes $used $avail $pct_used $mount\n);
}

this will help to format the bdf and even can remove NFS mount file systems if you comment that out.

Now I want to insert value into oracle table which has format

Name Null? Type
----------------------------------------- -------- ----------------------------
SERVER_ID NOT NULL NUMBER(6)
FS_LOCAL_NAME NOT NULL VARCHAR2(200)
LOCAL_MOUNT NOT NULL CHAR(1)
TOTAL_SPACE NOT NULL NUMBER(10)
USED_SPACE NUMBER(10)
SPACE_AVAILABLE NUMBER(10)
PERCENTAGE_USED NUMBER(3,2)

Here I have one problem because all of the required fields are in the above bdf output but SERVER_ID.

Could you guys help how can i insert into that table using the above code because the script is in perl but anything is ok whether perl or korn shell if it works

thanks