my $entry = $mw->Entry( -textvariable => \ my $localpath )->pack;