F�lix Hauri <felix 'at' f-hauri.ch> writes:
> $ strace 2>&1 leprogrammeencause args | grep ^open.*$USER
`strace -eopen' est aussi � noter pour ce type d'utilisation.
En general `strace -f' est necessaire pour suivre les forks.
Voire aussi ltrace pour des circonstances similairs (mais strace
est bien plus utile effectivement).
> while (<FH>) {
> /(read|write).* = (\d+)$/ && do {
> $tot{$1}=$tot{$1}+$2;
> my $etim=time()-$first;
> syswrite ( STDOUT,
> sprintf "\rR:%12d W:%12d %8d -> r:%11.2fK/s w:%11.2fK/s",
> $tot{read}, $tot{write}, $etim,
> $tot{read}/$etim/1024, $tot{write}/$etim/1024 )
> if $etim > 0;
Pourquoi ne pas utiliser printf directement, au besoin avec $| � 1 ?
--
Guillaume Cottenceau - http://zarb.org/~gc/
_______________________________________________
gull mailing list
[email protected]
http://lists.alphanet.ch/mailman/listinfo/gull
