Select Code to Download

my $statusFrame = $main -> Frame(-background => 'white') -> pack(-side
+ => 'top', -fill => 'y');
my $status = $statusFrame -> Text(-background => 'black', -foreground 
+=> 'white') -> pack(-side => 'top', -pady => 9, -padx => 9);

sub compile {
    my $input = $ent0 -> get();
...
        exit unless runLinux("$image","$cpu");
    }
}

$status -> configure(-text => 'status here');