my $check = lc $type;

my $div = $MB;
$div    = $GB if $check eq 'gb';

$size = sprintf "%.2f", $size / $div;