load averageを時系列で可視化するワンライナー

perl -le 'sleep 1 and print "|" x (100 * `sysctl -n vm.loadavg | cut -d " " -f2`) while 1'