Select Code to Download

#!/usr/bin/env perl
use strict;
...
6 quux
7 thingy
8 widget

$VAR1 = [
          {
...
            'filename' => *::DATA
          }
        ];