Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
how to get file size 2
- Thread starter ediforu
- Start date
-
2
- #2
- Thread starter
- #3
requires gawk 3.1+
function dirlist(dir,pat, array1,x) {
if (!pat || !dir) {
perror("No pattern or directory for file matching.", 1)
}
command = "ls -l " dir pat " | sort"
while ((command |& getline) > 0) {
array1[$9] = $5 / 1024
}
parray(array1,x)
tlist = array_to_list(array1)
return tlist
}
function array_to_list(arrname, tlist,m) {
for (m in arrname) {
tlist = length(tlist) < 1 ? arrname[m] : tlist" "arrname[m]
}
return tlist
}
function perror(msg,flg) {
printf "%s\n", msg
if (flg) {
exit
}
return
}
function parray(arrname,len, x) {
while (x <= len) {
print arrname[x++]
}
return
}
BEGIN {
x = 0;
xlist = dirlist("/home/me/","*.txt"
if (xlist) {
split(xlist,arr)
for (x in arr) {
print x , arr[x]
}
}
}
{
more stuff
}
It's a lot easier in the shell.
function dirlist(dir,pat, array1,x) {
if (!pat || !dir) {
perror("No pattern or directory for file matching.", 1)
}
command = "ls -l " dir pat " | sort"
while ((command |& getline) > 0) {
array1[$9] = $5 / 1024
}
parray(array1,x)
tlist = array_to_list(array1)
return tlist
}
function array_to_list(arrname, tlist,m) {
for (m in arrname) {
tlist = length(tlist) < 1 ? arrname[m] : tlist" "arrname[m]
}
return tlist
}
function perror(msg,flg) {
printf "%s\n", msg
if (flg) {
exit
}
return
}
function parray(arrname,len, x) {
while (x <= len) {
print arrname[x++]
}
return
}
BEGIN {
x = 0;
xlist = dirlist("/home/me/","*.txt"
if (xlist) {
split(xlist,arr)
for (x in arr) {
print x , arr[x]
}
}
}
{
more stuff
}
It's a lot easier in the shell.
- Thread starter
- #7
thanks vlad, that answers part of my question
could be so kind to take a look at this:
I am parsing a log file
Oct 2 05:50:07 /mniprod/xmit/o.coneg.1002020346
Oct 2 05:50:15 /mniprod/xmit/o.coneg.1002020347
Oct 2 05:50:27 /mniprod/xmit/o.coneg.1002020356
Oct 2 05:51:08 /tsiprod/xmit/o.tetra.1002020422
I need to get the file size of the file in the log.
thanks in advance
could be so kind to take a look at this:
I am parsing a log file
Oct 2 05:50:07 /mniprod/xmit/o.coneg.1002020346
Oct 2 05:50:15 /mniprod/xmit/o.coneg.1002020347
Oct 2 05:50:27 /mniprod/xmit/o.coneg.1002020356
Oct 2 05:51:08 /tsiprod/xmit/o.tetra.1002020422
I need to get the file size of the file in the log.
thanks in advance
- Thread starter
- #8
something like that to start you off - for Solaris:
[no error checking]
nawk -f getSize.awk getSize.txt
#--------------- getSize.txt
Oct 2 05:50:07 /bin/ls
Oct 2 05:50:15 /bin/nawk
Oct 2 05:50:27 /bin/tar
Oct 2 05:51:08 /bin/cut
#--------------- getSize.awk
BEGIN {
lsSIZE=5
filePath=4
CMD="ls -l"
}
{
cmd=CMD " " $filePath
cmd | getline fileSpec; close(cmd);
split(fileSpec, fileSpecARR, " "
filesARR[$filePath]=fileSpecARR[lsSIZE];
}
END {
for (i in filesARR)
printf("%s -> [%s]\n", i, filesARR);
}
vlad
+---------------------------+
|#include<disclaimer.h> |
+---------------------------+
[no error checking]
nawk -f getSize.awk getSize.txt
#--------------- getSize.txt
Oct 2 05:50:07 /bin/ls
Oct 2 05:50:15 /bin/nawk
Oct 2 05:50:27 /bin/tar
Oct 2 05:51:08 /bin/cut
#--------------- getSize.awk
BEGIN {
lsSIZE=5
filePath=4
CMD="ls -l"
}
{
cmd=CMD " " $filePath
cmd | getline fileSpec; close(cmd);
split(fileSpec, fileSpecARR, " "
;filesARR[$filePath]=fileSpecARR[lsSIZE];
}
END {
for (i in filesARR)
printf("%s -> [%s]\n", i, filesARR);
}
vlad
+---------------------------+
|#include<disclaimer.h> |
+---------------------------+
- Status