#!perl -lp
$_*=($_+++$_)*$_--/6