Select Code to Download

my $action = sub {
      return [200, [ 'Content-Type' => 'text/aXML' ],
                   [ '(use)(qd)action(/qd)(/use)'  ] ]; };

my $action = sub {
...
    ]; 
};