I suppose by now you have your problem solved, but since I had a similar problem and found "one more way to do it" the following might be useful to someone
my $b= $import_w->LabEntry(-label=> 'mytext',
-labelPack=>[-side=>'left'] )->pack(-anchor=>'e');