Select Code to Download

given ($line) {
    when ( m{\A Job:  }xms ) { $job_details_info{Job} = $line }
    when ( m{\A File: }xms ) { push @files, $line }
    when ( m{\A Image }xms ) { $job_details_info{Image} = $line }
}

use List::Util qw( first );

...
else {
    warn "no match: $line";
}