Search results for query: *

I have a sub routine set up that accepts 1 argument. When I try to call the subroutine again in my program, it says there is "Too many arguments" Even though there is the same ammount on the first call! Any help would be appriciated! Thanks

I have created a ROText box that I send text output to... Is there a way to capture everything thats in the ROText box and print it to the dos screen? What I'm really trying to do is make it so I can create a log file of what was in the ROText box. Printing the ROText variable used only...

Is there a way to have a modal window within a main window? What I mean is a child window of another, where you cannot click on any other window (sort of like how it is when you have a dialog box)... I'm creating all these new windows in my program and I don't want users to go to previous ones.

I have a bunch of prepare and execute statements that will run after a user clicks OK on a Perk TK dialog box. Most of the time it will freeze on the mouse release and do its work behind the scene, then when its done, my script output window displays. I would like the script output to display...

If I define a new window, is there a way to disable the maximize/minimize/close buttons on the top right of the window? my $main_win = MainWindow -> new();

Is there a way to show a window if it was already declared? my $main_win = MainWindow -> new(); will display a new window... I know you can $main_win->destroy, but is there a way to bring it back like $main_win->show? $main_win->show doesn't work for MainWindows...

I have a menu bar with code: $main_win->configure(-menu => my $menubar = $main_win->Menu); my $file = $menubar->cascade(-label => '~File'); $file->command(-label => 'Test', -command => \&test); $file->command(-label => 'Exit', -command => \&exit); How can I change the color from the standard...

I can't figure out how to execute a *.pl file from a windows shortcut (Active Perl installed). I have perl command line interpreter associated with *.pl files... When I double click on it, it just flashes a cmd prompt and does not run the application.

I'm trying to execute a command prompt statement that sets the tracelevel for my environment: an Example of what I type in a cmd prompt (dos/unix black screen) is: set DBTRACELEVEL=2 I would like perl to be able to issue this command from a TK window. I would set up a button with a command...

I have a popup dialog box which has a lable entry to get user input. Not only would I like to set the focus on the input entry when it pops up, but also, on the pop up window itself (the window stays deselected until the mouse is clicked on it). None of the '->focus' codes I found work...

Has anyone has any experience using the TK::MacProgressBar? Heres the site I came across, but how would you actually get the progress bar to load what your doing? (I'm running batch SQL scripts) site: http://www.en8848.com/Reilly%20Books/perl3/tk/appc_08.htm

I have this Read only Text window with a vertical scrollbar on the right side: $script_output = $middle -> Scrolled ('ROText', -height => 30, -width => 90, -scrollbars => 'osoe', -background => 'white') -> pack(); I insert into this text box with: $script_output -> insert ('end', "My Text...

# Create Main window my $window = MainWindow -> new(); $window -> minsize(qw(450 250)); $window -> title (" Perl Conversion Tool"); $window -> configure (-background => 'grey'); $window -> geometry('+280+150'); The geometry tag sets the position of the window on the screen. Is there a way to...

What I would like to do is have a button close my window (prompt_window), but also call a function (user_continue): my $btn = $main -> Button (-text => 'Click Me', -command => sub {$prompt_window -> destroy}, -command => \&user_continue) -> pack (); It only executes the last -command. Any...

I'm editing a program which will run a set of .sql batch statements. It uses the following code to connect to the database: --------------------------------------------------------- use DBI; use strict; my $data_source="dbi:ODBC:$ENV{DSQUERY}"; # Connect to the db - retrieve db handle my $dbh...