Try to install the modules by yourself.
Have a look at Installing modules without a rootshell. Otherwise draw simpler graphs ;-)

my ( $m, %h ) = 0;
while (<DATA>) {
  my ( $k, $v ) = split / /, $_, 2;
  $m = length $k if $m < length $k;
  $h{$k} = $v;
}

for ( sort keys %h ) {
  printf "%${m}s %s\n", $_, 'x' x $h{$_};
}

__DATA__
thisone 3
thatone 1
something 7
else 4

__OUTPUT__
     else xxxx
something xxxxxxx
  thatone x
  thisone xxx
[download]