my $f="^("
                                                     ;my $r = '"';my$c
                                                 = 1; my $i; my $t;sub
                                                  llama{my $n=shift;my
                                                    $r=""; for
                                                    (1..11){$r
                                                    .=($n>=(2
                                                    **(11-$_))
                                                     )?1:0;if(
                                                    rindex($r,
                                                    "1")==$_-1
                                                   ){$n-=(2**(
  11-$_));}} return $r;}$_ = "0";$_.=llama(1855) ; $_ .=llama(
188);$_.=llama(935); my   @i= split(//,$_);foreach(@i){#;+++''
$_+=2;$f.='.'x$_.')('; $r.='$'.$c++.' ';}$r .= '"';#';+++;++'
$f.=')';my $string = "";foreach(<DATA>){$string.=$_;}#'+#++;:
$string =~ s/[ \n]//g;my@g=unpack("C*",$string);#;';:;##+'#
  my $st="";for(1..44){$st .= (($t=(($i=shift(@g))==#';###':
   38)?$i+shift(@g):$i-shift(@g))<=9)?#,.+'';'';';+'''++@#,
    "0".$t:$t;}$_=$st ."4";#++'##+;',::',;;+#;+##,;;@#@#+,
    /$f/;###';##';;;;++#+@++@#+#@+'',:'';'''+##+@;#:+@#:;
    my $s = eval $r;#`'+@@@@##@@@+###@#;,''#@@+@''++#+',
     my @p = split(/ /, $s);#@@@@+#@'@'+##+##@+#@++#@,`
      print pack("C*",@p). "\n";###@#@+#;@##+@######'`
       #@@#'';:+'''+#++`    '@@@#@#@@@###@@####@#+',.
         #@@+;##;'+;+#`      ,:+####@@@+#@#+#@#+@#
          #@@#++#;+##           ..+#+''#'@@@@#;+@#
           #@@##++'''             ` ,.` #@@@@#;#;.
           __DATA__                     #@@@@@@#+'
            &$.#&!                      :+.#{<?"&
            !.$.#                       .#:*.$O&%$
           .#O$<                        $.%&!.%&;
            .#_"                        %$.   #&!
            :,O&                        O/     }-
             .$.                        #<     ..
              $}                        *<     '+
              '&;                       &=     .$
               &!                        %$     .#
[download]