Select Code to Download

    my $t = $w->Scrolled('ROText', '-bg', '#ffdfff', '-scrollbars', 'o
+soe');

#!/usr/bin/perl
#
...
    };
    return $psub;
}