Pop up Message in PERL

[pramodkh]

Hi All,

I have a query

Is it possible in PERL to popup a message?
I have a requirement like this:
Copy a file from a location and once the copy is complete pop up a message to the user that Successfully copied the file...(as the copying file script is scheduled in the scheduler...user dont want to refer to the log files). I can think of sending mails...but i feel sending mails is not feasible for such a small requirement.

Till now i haven't tried something like this...I just started seraching for this, if this is possible then please let me know.

Thanks in advance.
Regards
Pramod

[nithinpes]

For sending Windows pop-up messages, you can make use of Net::NetSend module.

[pramodkh]

I am able to achieve this using Perl TK.
here is the code:

use Tk;
use strict;
 
# Main Window
my $mw = new MainWindow;
$mw -> messageBox(-message=>"Successfully Copied the File");
 

Thanks for everyone.
Regards
Pramod

[savanm]

I am able to achieve this using Perl TK.
here is the code:

use Tk;
use strict;
 
# Main Window
my $mw = new MainWindow;
$mw -> messageBox(-message=>"Successfully Copied the File");
 

Thanks for everyone.
Regards
Pramod

Another way to do this using win32 Module

use Win32;
Win32::MsgBox("Successfully copied");
 

[pramodkh]

Another way to do this using win32 Module

use Win32;
Win32::MsgBox("Successfully copied");
 

Hey Thanks Savan. This is more useful. With TK it was opening some unwanted window in the background. This is what I wanted.
Thanks.
Pramod

[savanm]

Hey Thanks Savan. This is more useful. With TK it was opening some unwanted window in the background. This is what I wanted.
Thanks.
Pramod

Hi

 
Welcome.. Carry on Mr.promoth.