RE: perl Tk question

[BLAHA Jan]

> When executing this snippet
> I see in text0 only the last $i /in for cycle/
> What I  must add to prg code
> in order to see all cosequtive values of $i ?

for (my $i=0;$i<20;$i++){
#$text0->delete('0.0','end'); # just don't delete everytime all
contents of the box
$text0->insert('end',"$i\n");
}

Regards,

Jan Blaha

___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Mapping Drive

[BLAHA Jan]

> Hi All,
>   I was wondering if anyone know of a perl module that let's me
> map to a network path. 
> Example: g:\ = \\wongd01\blds

This functionality is provided by Win32::NetResource module
and its AddConnection method.

best regards,
Jan Blaha

P.S. Example could be something like:

use strict;
use warnings;
use Win32;
use Win32::NetResource qw(:DEFAULT AddConnection);
my $Drive = Win32::GetNextAvailDrive;
my $Share = "server\\share";

my %NetResource= (
'LocalName' =>  "$Drive",
'RemoteName' =>  "$Share"
);
my $username = "";
my $password = "";
my $persistence = 0 # 0 non-persistent, 1 persistent
AddConnection(\%NetResource, $username, $password, $persistence);

___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: How to use "#! perl " to directly run perl script on Win32 platform?

[BLAHA Jan]

> Subject: How to use "#! perl " to directly run perl script on 
> Win32 platform?
> 
> 
> Hello ,
> 
>  Could you please tell me how to use "#! perl " to directly run perl
> script on Win32 platform?
> 
>  Assume that ActivePerl has installed in "c:\perl" .
> 
>  Any help will be appreciated.
> Thxs,
> 
>  Honery.

Hello,

I may be wrong, but '#!' notation does not work on win32.
In order to run scripts directly, pl extension must be associated with
appropriate perl executable.

Regards,

Jan Blaha

___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs