Select Code to Download

use strict;
use warnings;
...
my $newServices = do 'temp.txt';

Dump ($newServices);

$HASH1 = {
           1 => {
...
                  name => 'service2'
                }
         };