perl -e "for (213,48,12,7,9,7,78,22) {print \"\n$_\t\" . $_/396}" 213 0.537878787878788 48 0.121212121212121 12 0.0303030303030303 7 0.0176767676767677 9 0.0227272727272727 7 0.0176767676767677 78 0.196969696969697 22 0.0555555555555556