Блог компании REG.RU / День 2^8

Дорогие программисты Хабра! Мы от всей души поздравляем вас с профессиональным
праздником! Специально по такому случаю наши программисты приготовили вам небольшое
поздравление:

#!/usr/bin/perl
undef$/;$s=<DATA>;
foreach (split//,$s) {$b.=$_ eq'D'||0if/[OD]/;print pack("b8", $b)and$b=''if length$b>=8;}
__DATA__
                                            RROORR                              
                                          ORRDORRRRODRRRR                       
                                       ODRRRRROOOORDRDRRROOROROR                
                     .......         RRRODDDRRORRRROOORRRRRODDDORRDROO          
              ...............      RRDDRDDROROOOOODROROORRRRROOODRRRRRRDDR      
         ....................    RORRORDRORRRODDDRORDRRRRDDRRRRDORRRRRDDODDD    
       ........................RRROORDDORRORDRORODRRRRDRRDRODORORROODDRRO       
       .....................RDODDODDORRDODDRRRRRRRRORRRDDORDRORDORRORDRRR       
       ...................RRRDRORRODRRROODRRRRRDDORRRRRRDDRRRRRRROODRDRDO       
       .................ROOORORODRROROORRRORRDRROORRRDRRRDRRRRORDRRORRROO       
     ................ODRRRRRDRORRDRRROODDDDORODRDDRRRRRODORRRRORRRROOORO        
     ..............RRRODRRRRRROOORDRRRROOOODRRRRODODRROORDRRDRORRDDORRRR        
     ............ORRDDRRRRRDROROORDODRRDDOOOROORORDRORROORDORRRRRRORDDRD        
     ..........RODORDRRORRODDRORRRDRDDORRRRODDODOORROORRDDOORRRRRDRRRORR        
     .........ODRDRRDROORRRRRORRDOORRRRDRDORRDDOODDDOOORORORRRRRODORROOR        
     .............RDRDRORRRORDRDRORRRODRROORDRRRDRDRRODDDRRDORRRDDORDOR         
     .............DDORRDRDOORROROOODROORRRRODRRRORORDRRODRODORDRRRORORR         
     .............RRRODORDRRRRRRDRDROORRRRORDRRROORDRDRDRRODRORRRRORODO         
      ...........RRORDRRORRRDRRORDODORRDRODRROODDDRRODROORROOOOORRDRRRR         
      ...........RRORRORDDOORDRORDRRRRRRROOORRRORRODDDRRRRRR    RORDROR         
      ...........DOODRRRRRDORDDOOORDRDODRRORRRRODRRORD          RRDROR          
      ...........RRRRRDRORRRORRROODDROORORDRDRORRDRDO           OORROR          
      ..........OODROORRDRRDRRRDRRORORRDDRORRODOODDDO           DRRORD          
      ..........ORRODRRRRRDORRRDRORDRORODDOORRRORDRR            ODRRDR          
      ..........RDORRRDORORRDODDRRORRRRRODRRRDDRRRRR           RODDRO           
      ..........DDRDORRRRORDRDRORROROOORORDRRORRRRRR           ORRROR           
       ........DRRRRDROORRDRRDODDRDRRRRRRDORRRDRDOOR           RDRORR           
       ........RRORDDRDOORORROORRODRROROROOORDRORRD            DRRRRR           
       ........RORDOOROODDRORRRRODRRRRORRRROODDORRO           RDORRR            
       ........ORRRRDDDRRORRRRDRROOORRODRRDRROROOOR           RRRRDO            
       ........DRRRDRRRODRRRRORROORRRRRRORDDRROODOR           OORRRR            
       .......RRRRDDRROORRRDRRORRODRRDRRRRDRORORRO           RRRRRR             
       .......RRROORRRORRDORORDRODODRDRDRRRORDRRRR                              
       .......DRORRORDRRDRDRORRRDODRRRRRRORRODDOOR                              
        ......RRDRORRRRODDRRDORDDROORDDRRDRRROODRR                              
        ......RRRORRDOORORRRORRRRRRRRRRRRRRRR                                   
        .....RRRRRRRRRRRRRRRRRRRRRRRRRR                                         
        .....RRRRRRRRRRRRRRRRRRRR                                               
        .....RRRRRRRRRRRRRR                                                     
         ...RRRRRRRRR                                                           
          ..RRRR

Рубрика: Habr