Select Code to Download

#!/usr/bin/perl

...

print "\n\n";
exit(0);

$VAR1 = \bless( {
                   'XCC_dwopts' => {},
...
                                                                      
+                                                                     
+               'Name' => 'Name',
                                                                      
+                                                                     
+               'gMonthDay' => 'gMonthDay',
                                                                      
+                                                                     
+               ...