simple graphic

for i in 2 12 56 2 4; do echo $i|perl -e 'while (<>) { print "."x $_ . "\n"; }'; done

..
............
........................................................
..
....