I get 6 of this "out of ..." crap and one idiot returned me as "rejected".
ok... moderator of this list or anyone from ActiveState, why don't you do
anything about that SPAM and SPAMMERS?
probably I get another 7 spam after sending this one and I think that I'll
unsubsribe from all activestate li
PAR has it's own discussion list:
http://lists.perl.org/showlist.cgi?name=par
you may get a better answer from there...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Rush,
Thomas
Sent: Friday, March 26, 2004 7:54 PM
To: [EMAIL PROTECTED]
Subject: PAR - WI
> Any way you can go back to Tk 800.024 and try again?
I can, but I don't want to :) btw, I' ve installed the beta from Randy Kobe'
s ppm rep.
-Original Message-
From: Arms, Mike [mailto:[EMAIL PROTECTED]
Sent: Monday, February 23, 2004 7:43 PM
To: 'Burak Gü
Sent: Thursday, December 18, 2003 12:36 AM
To: Burak Gürsoy
Cc: Perl-Win32-Users
Subject: Re: configure perlscript
Burak Gürsoy wrote:
> I've installed activeperl (a long time ago) on win98 and now I'm
> using windows 2000 for a while, but I'm also using perl that I've
> i
try XML::Simple => http://search.cpan.org/~grantm/XML-Simple/
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Gary
Nielson
Sent: Sunday, November 09, 2003 9:35 PM
To: [EMAIL PROTECTED]
Subject: Struggling with my first XML::Parser project
I have partially
Thank you for the reply Jan :)
-Original Message-
From: Jan Dubois [mailto:[EMAIL PROTECTED]
Sent: Monday, November 03, 2003 6:02 AM
To: Burak Gürsoy
Cc: Perl-Win32-Users
Subject: Re: perlis is *very* slow
On Mon, 3 Nov 2003 05:17:21 +0200, Burak Gürsoy <[EMAIL PROTECTED]>
wrote
object in a expression
?
e.g.
if ( defined ($Obj->phone()) ){
#do something
}
This is always true!
I tried
if ( defined ${($Obj->phone()}) ){
# do smthg
}
and this is always false.
Thanks,
Nicu
-Ursprüngliche Nachricht-
Von: Burak Gürsoy [mailto:[EMAI
because you are trying to call a subroutine inside a string... there is a
trick to do this, but I find it unnecessary. you can use printf()
printf "new Obj->Phone is %s ",$Obj->phone;
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
[EMAIL PROTECTED]
Sent: Fr
is it possible to use the OpenGL module on windows?
http://search.cpan.org/~ilyaz/OpenGL/
... and; are there any binaries somewhere?
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Which one is better (equal?)? why?
%some_hash = (
blah => sub { bleh() },
foo => sub { $bar - $baz / 100 },
.
.
.
);
$some_hash{foo}->();
[or]
%some_hash = (
blah => 'bleh()',
foo => '$bar - $baz / 100',
.
.
.
);
eval { $some_hash{foo} };
Well... I'm curious about sub()...
_
I've searched cpan but only found some APIs to several search engines...
I want to parse search string and split parameters. like user can put a plus
sign for wanted words and minus for not-wanted or put single or double
quotes or some other weird thing etc... if such a module exists I'd like to
k
Is there a perl module or anything in any language like this? I mean, we
only pass some parameters like where the data is and define some required
data like username and password areas and it will return a member object to
use? it can be a cgi or anything...
I'm just curious :)
__
03 5:26 PM
To: [EMAIL PROTECTED]
Subject: RE: REWRITE RE: Error trapping
Grrr still didn't catch the error
-Original Message-----
From: Burak Gürsoy [mailto:[EMAIL PROTECTED]
Sent: Thursday, July 17, 2003 1:06 PM
To: [EMAIL PROTECTED]
Subject: RE: REWRITE RE: Error trapping
o
Sorry for sending this one two times...
There was an error in the mail server last weekend I think...
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of
> Burak Gürsoy
> Sent: Sunday, March 30, 2003 8:23 PM
> To: Perl-Win32-Users
>
I want to add html-like clickable hyperlinks inside a richedit. How can I do
this with Win32::GUI?
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
I dont want to compile anything... If I want to, PAR is a good choice I
think...
Read the subject please...
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf
> Of Gregory, Carlton
> Sent: Friday, March 14, 2003 10:49 PM
> To:
If there is a perl way to extract icons and such things from a file, I'd
also like to know it...
Not any commercial progs please...
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of
> Gregory, Carlton
> Sent: Friday, March 14, 2003 4:37 PM
> To: [EMAIL P
well... it looks like the only solution is to install the new perldoc:
http://search.cpan.org/author/SBURKE/Pod-Perldoc/
It solved my problem.
this was also discussed in pod-people
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf
> Of Franz, Roger
> Se
I archive some old messages, and used the code that Chris Anderson posted
last year to replace the "Tk" icon with an image I've defined. I've realised
that Tk accepts base64 encoded image codes, instead of a raw image data, so
I've changed the code a little:
if (my $image = image('logo.gif')) {
Maybe a silly question but, can we use the wheels of a scroll mouse in a Tk
window? I couldn't find a way to do this...
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
I found that packForget() is doing (nearly) what I want :)
But instead of updating the area, it deletes the hlist part...
> -Original Message-
> From: Burak Gürsoy [mailto:[EMAIL PROTECTED]]
> Sent: Saturday, February 15, 2003 3:28 PM
> To: Tillman, James; Perl-Win32-Users
&
-font => $conf{font});
$h->itemCreate($e=> $col,
-itemtype => 'text',
-style=> $style,
-text => ($col == 0) ? ($y+1) :
$results[$y]->[$co
able for perl 5.8.
> so I have switch from Perl 5.8 to Perl 5.6, and it is ok now.
>
> I want to thank all fo you for your usefull help, and specially :
>
> - Burak Gürsoy
> - Christopher R. Jones
> - Fernando Freire Baez
> - Kim H. Young
> - michael higgins
Well... there was a discussion with this module in dbi-users this week. It
looks like it has a problem with the blobs. I didnt use it.
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf
> Of Tillman, James
> Sent: Friday, January 24, 2003 4:58 PM
> Cc: [EM
how about using a parameter with a constructor?
my $obj = Your::Class->new({param1 => $va1,DEBUG => 1});
...
sub new {
my $class = shift;
my $options = shift;
...
if ($options->{DEBUG}) {
# enable some debugging options or set $Your::Class::DEBUG var to 1
}
...
}
-Original
n Behalf
> Of Christopher R. Jones
> Sent: Thursday, January 23, 2003 6:18 PM
> To: theatrale; Burak Gürsoy; [EMAIL PROTECTED]
> Subject: Re: DBD::MySQL
>
>
> I always check out the Activestate package archives.
> http://ppm.activestate.com/PPMPackages/zips/6xx-builds-only/
>
the fact is, perl was (and still is) the #1 language in CGI programming, and
a lot of the people think that CGI is a language and perl is something
related to it. Looks like it is the same all around the world :p
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On
I think that mysql 4 libraries or at least their names are different, I
couldnt compile the module to use mysql 4 ? can you give any info on that?
> -Original Message-
> From: Randy Kobes [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, January 23, 2003 5:56 PM
> To: theatrale
replace the string 'mysql' with
'mysqlPP' in your codes...
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf
> Of theatrale
> Sent: Thursday, January 23, 2003 5:22 PM
> To: Burak Gürsoy; [EMAIL PROTECTED]
> Subject:
okie dokie... It looks like I misunderstood something. Thanks :)
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf
> Of Alan Dickey
> Sent: Sunday, January 12, 2003 1:54 AM
> Cc: Perl-Win32-Users
> Subject: Re: bless question
>
12, 2003 12:22 AM
> Cc: Perl-Win32-Users
> Subject: Re: bless question
>
>
> Burak Gürsoy wrote:
> >
> > Can anyone explain this? is this a bug or feature?
> >
>
> what were you expecting>
>
> > #!/usr/bin/perl -w
> > use strict;
> >
Can anyone explain this? is this a bug or feature?
#!/usr/bin/perl -w
use strict;
package Test::One;
sub new {
my $class = shift;
my $self = {};
bless $self, $class;
return $self;
}
package Test::Two;
sub new {
my $class = shift;
my $test_it = shift;
my $self= $test_
hmm... ok :)
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of
> Carl Jolley
> Sent: Friday, January 10, 2003 10:00 PM
> To: Burak Gürsoy
> Cc: [EMAIL PROTECTED]
> Subject: RE: IP Address
>
>
> On Fri, 10 Jan 2003
[it looks like there is a problem with the mail server? 2nd try to send
this...]
this builds a new hash even if only one indice has changed...
#!/perl -w
use strict;
my %default = (
one => [2, 3, 6, 7],
two => [4, 3, 2 ,1],
three => [1, 4, 5,
my($ca,$b);
while (($data) = $sth->fetchrow_array) {
if($data =~ /^A$/i) {
print "" unless $ca;
$ca = 1;
}
if($data =~ /^B$/i) {
print "" unless $cb;
$cb = 1;
}
}
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
stev
#!/perl -w
use strict;
my %default = (
one => 1,
two => 2,
three => 3,
four => 4,
five => 5,
six => 6,
);
my %cgi = (
one => 10,
two => 20,
Activestate must add this address to the standard ppm repository list :))
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Randy
Kobes
Sent: Thursday, December 26, 2002 10:16 PM
To: Bruce Winter
Cc: [EMAIL PROTECTED]
Subject: RE: 5.8 GD, DB_File, and TK::J
IIS only looks at the extensions I think... I dont remember a configuration
option to enable what you said... I never use the full (and correct) path to
perl executable, but everything works fine (win2k pro)
Apache' s default config requires exact path, but you can change this...
-Original Me
Free for evaluation...
I dont buy everything I like...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Lee
Goddard
Sent: 12 Aralik 2002 Persembe 19:16
To: Burak Gürsoy; [EMAIL PROTECTED]
Subject: RE: Two questions...
At 18:03 12/12/2002, Burak Gürsoy
Well... TextPad is shareware, but it has no time limits and it does not
block any functionality (FYI)... It's a nice editor and does not eat your
system resources...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
[EMAIL PROTECTED]
Sent: 12 Aralýk 2002 Pe
http://webfx.eae.net/dhtml/richedit/richedit.html
no module needed I believe... evething happens on the client side...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:perl-win32-users-admin@;listserv.ActiveState.com]On Behalf Of George
Harris
Sent: Monday, November 11, 2002 8:31 PM
To:
$_ = 'c://WINDOWS/system32/winver.exe';
my @tmp = split /\//;
print pop @tmp; #or print $tmp[-1];
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
steve silvers
Sent: Friday, November 08, 2002 3:58 PM
To: [EMAIL PROTECTED]
Subject: File::Recurse Question
if(/\.(exe|bat)$/i) { # i: ignore case
# do something
}
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
steve silvers
Sent: Friday, November 08, 2002 2:56 AM
To: [EMAIL PROTECTED]
Subject: Pattern match file extenstions
Im trying to match on both .bat an
you cant use functions in double quotes. When you pass a string, you must
quote it, and leading ampersand is optional when you call it with
parenthesis...
print "Hello ",caps('shain')," Nice to see you today.\n";
sub caps {return uc shift};
-Original Message-
From: [EMAIL PROTECTED]
[mai
you can use crypt():
#!/usr/bin/perl -w
use strict;
print generate_password(), "\n" for 1..1000;
sub generate_password
return(substr(crypt("",join('',(0..9,'A'..'Z','a'..'z')[rand 62,rand
62])), -8 ));
}
if you want to check if the same string is generated, you can write some
control struct
using seperate files can be better... then you can call them via require().
each module can export a hash to your namespace via Exporter...
if($lang eq 'en') {
require YourNameSpace::En;
} elsif (...) {
#...
} else {
#...
}
print $en{'mes001'};
# etc...
-Original Message-
Fro
you cant do that. try require() instead
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
Fernando Freire Baez [Medicare)
Sent: Friday, July 12, 2002 8:24 PM
To: [EMAIL PROTECTED]
Subject: Use a module from a user param input
Hello,
I am working in an in
8, 2002 4:32 PM
To: Burak Gürsoy; ActivePerl
Subject: Re: ole? notepad?
> how can i launch notepad and print something in it?
You can print with Notepad from a shell command line using the following:
prompt> notepad /p filename.txt
There's several ways (as one would expect from Pe
adding a new command named "NOTEPAD" is better IMO
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
[EMAIL PROTECTED]
Sent: Thursday, May 16, 2002 3:51 PM
To: [EMAIL PROTECTED]
Subject: RE: Can't Locate Perl in Registered File Lists
How to make .pl files
oops!
sorry about the previous message. I didnt see Mike's message...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Adam
Frielink
Sent: Thursday, February 28, 2002 7:18 PM
To: Morse, Richard E.; [EMAIL PROTECTED]
Subject: RE: MSAccess file format questi
*untested just an idea :)*
create a blank access database "blank.mdb" and if you want to fill it, copy
it to another dir and do what you want :) you'll still have a blank db for
future uses
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Morse,
Richard
I use MIME::Lite
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Bryan
T. O'Malley
Sent: Wednesday, February 27, 2002 8:33 PM
To: [EMAIL PROTECTED]
Subject: sending a file as an e-mail Attachment using Perl
I have used net::smtp to send e-mail. Works g
% means (as a variable) hash
%my_hash = (blah_1 => "value 1", blah_2 => "value 3");
etc... nothing to do with globals...
my() and local() make your variable lexical scoped (read perl
documentation).
you must write it as;
my $sFilePat h = 'c:\some\path\file.txt';
if you call some vars from an
53 matches
Mail list logo
