Select Code to Download

use warnings;
use strict;
...
File5   pqr    100    150  
File3   Ade    203    340
File2   Sea    101    201

$VAR1 = {
          'File2' => {
...
                                ]
                     }
        };