Traffic info system

Hej.

Jeg har et PERL system, som sender info fra en Ubuntu server ud til mIRC - men, jeg har et problem med at konvertere trafik output

For ikke at spamme, har jeg lagt scriptet her -> http://pastebin.com/FJjF12yb

Det jeg gerne vil have den til, er når der systemmet har uploadet eg. 1GB skriver den 1GB og ikke 1048576 MB

For i øjeblikket udskriver den således
Traffic (eth0): 1202926.46MB In/1384742.27MB Out

Håber I kan hjælpe =]