#!/usr/bin/perl
my $int = 999999999999999999999999999999999999;
print $int**$int,$/;