Select Code to Download

$VAR1 = [
          'Wellbeing Office                                           
+                  ',
...
          'C303                                                       
+                                         ',
          'InProgress                                                 
+                                         '
        ];

 
#!/usr/bin/perl
use strict;
...

use Data::Dumper;
print Dumper(\@table);