@J =( 74,117,115,116,32,97,110,111,116,104,101,114,32,112,101,114,108,32,104,97,99,107,101,114);
for ( @J ) { 
	print chr( $_ );
}
print "\n";