perl -pe's/(^|\s)((\d?\d)?(\d)(\d)\d{5}|(\d?\d)?(\d)(\d)\d\d|\d{1,3})(?=\s|$)/$1.($3?"    $3$4G":$4?"  $4.$5G":$6?" $6$7M":$7?" $7.$8M":$2)/ge'