topic Re: extract data in Operating System - HP-UX

extract data

Cheng Wee — Tue, 16 Dec 2003 03:02:47 GMT

How can i extract field number 5 without the percentage sign n assign it to a variable.

for example,

/dev/vg00/lvol5 614400 177916 411617 30% /home

for this case i hope to get 30 instead of 30%

Rgs

Cheng Wee

Re: extract data

Mark Grant — Tue, 16 Dec 2003 03:05:05 GMT

expr "/dev/vg00/lvol5 614400 177916 411617 30% /home" : '.* $.*$%'

Re: extract data

James Murtagh — Tue, 16 Dec 2003 03:11:03 GMT

Hi Cheng Wee,

Probably not the best way....but it works :

# size=$(# bdf | awk '/vg00\/lvol5/ {print $5}' | cut -d% -f1)

You would change the search pattern enclosed in the /.../ for a more general search.

Cheers,

James.

Re: extract data

James Murtagh — Tue, 16 Dec 2003 03:12:32 GMT

D'oh! Obviously take the "#" out before the bdf....my cut and paste antics again.

Re: extract data

T G Manikandan — Tue, 16 Dec 2003 03:21:14 GMT

#bdf|awk '{print $5}'|awk -F "%" '{print $1}'

Re: extract data

Heiner E. Lennackers — Tue, 16 Dec 2003 03:22:08 GMT

They may be many ways, e.g.:

echo "/dev/vg00/lvol5 614400 177916 411617 30% /home" | awk -F "[\t %]+" '{print $5}'

or

echo "/dev/vg00/lvol5 614400 177916 411617 30% /home" | sed -e 's/^[^%]*[\t ]$[0-9]*$%[^%]*$/\1/'

and many more :)

Re: extract data

Cheng Wee — Tue, 16 Dec 2003 03:24:41 GMT

Hi Guys,

Thks for the solution, i exam all n all are working as expected.

Re: extract data

MarkSyder — Tue, 16 Dec 2003 03:26:15 GMT

bdf|grep /dev/vg00/lvol5|awk '{print $5}'|sed 's/%//g'

Mark Syder (like the drink but spelt different)

Re: extract data

Mark Grant — Tue, 16 Dec 2003 03:29:39 GMT

Actually, if youw ant a version that allows for NFS mounted filesystems and filesystems that go over two lines and will work ignore swap and /proc (on solaris) you could try this old thing I just dragged up of my hard disk

#!/usr/bin/perl
@FILESYSTEMS=(`bdf 2>/dev/null`);
while($filesystem=pop @FILESYSTEMS){
chop($filesystem);
next if $filesystem =~ /.*Filesystem.*/;
next if $filesystem =~ /swap.*/;
next if $filesystem =~ /proc.*/;

($waste,$waste2,$waste3,$waste4,$percentage,$fs)=split " ", $filesystem;

if($fs eq ""){ # A two line df filesystem output
$fs=$percentage;
$percentage=$waste4;
$filesystem=pop @FILESYSTEMS;
}

next if $filesystem =~ /:/; # Lose NFS filesystems
$percentage =~ /(.+)%/; # drop the % sign
print "$fs $percentage\n";
}