my $lbl_var_1 = $window -> Label(-text=>"Enter the keyword: ")->pack();
my $txt_var_1 = $window -> Entry()->pack(-pady=>20);
my $btn_var_1 = $window -> Button(-text => "Get the URL !", -command => \&Geturl)->pack();
my $table = $window->Scrolled('TableMatrix', -cols=>4, -drawmode=>'fast', -variable => $array_var,-state=>"disabled", -resizeborders => 'both',-colstretchmode => 'unset', -rowstretchmode => 'last')->pack(-pady=>20, -fill=>'x');