Select Code to Download

sub slurp {
    my $file = IO::File->new("params.inc","<") or die $!;
    restore_parameters($file);
    $file->close();
}