#!perl -pl
use bignum;$_**=4