perl -le 'print $^V'