Select Code to Download

use strict;
use warnings;
...
    $output->insert("end", $results);
    $output->see("end");
    $mw->update();

TIED INTERFACE

...
 printf "pi ~= %1.5f", acos(-1.0);

 MainLoop;