#!perl use strict; use warnings; use bignum; my $n = -1; print 10.00 **$n . "\n";