Help for this page
my %convert = ( KB => 10, MB => 20, ... $num = $1 * 2 ** $convert{$2}; } print $num;