Das Eingabefeld Widget
•#!/usr/bin/perl
•use strict;
•use warnings;
•use Tk;
•
•my $mw = MainWindow->new();
•
•$mw->Entry()->pack();
•
•MainLoop();