The new season of 24 is getting ready to kick off. Here is something to put you in the mood. Warning this is my first obfuscation submission. Turn your word wrap off to get the full effect.

#!/usr/bin/perl
#Quotes from our favorite CTU Agent!!!


        sub a{print pack('H*',"4".              "9276d2066656465".    
+          "72616c206167656e74".
        "204a61".       "636b2042".             "617565722c20616e".   
+          "6420746f6461792069".
        "732074".       "6865206c".             "6f6e67657374206461". 
+          "79206f66206d79206c".
        "6966".         "652e0a");}             sub b{print pack('H*' 
+          ,"49207472757374656".
        "420".          "796f752c".             "204e696e612e2e2e0a");
+          }sub c{print pack('H*
                        ',"49662".              "0796f7520646f6e277420
+74656c6c206d65207768617420492077616e".
                       "7420746f2".             "06b6e6f772c207468656e
+206974276c6c206a757374206265206120717".
                      "5657374696".                                   
+         "f6e206f6620686f77206".
                    "d756368207".                                     
+          "96f752077616e742069".
                  "7420746f2".                                        
+          "0687572742e0a");}sub d
                 {print pack                                          
+          ('H*',"546865206f6e6".
                "c7920726".                                           
+          "561736f6e2074686174".
              "20796f75".                                             
+          "27726520636f6e73636".
             "96f75732".                                              
+          "07269676874206e6f77".
            "20697320".                                               
+          "6265636175736520492".
           "0646f6e2".                                                
+          "7742077616e7420746f".
        "20636172727920796f752e0".                                    
+          "a");}@r=("a","b","c",
        "d"); eval($r[int(rand                                        
+          ( $#r +1 ) ) ]    );
[download]