Select Code to Download

my $template = "a" x $left_out ;


shift @array while($left_out--);

my $template = "x$left_out" ;

--
@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/