Dear all
I have problem to convert the UML's classes into Perl Object oriented,
coz, I can't find a good example to do with it. Anyone know, where can
I can some good example on the net.
Thank you very much.
--
May GOD blesses you, and your family
__
Hello to all,
I'm trying to write a Win32::GUI::AxWindow application by
opening a web page. But for some reason I'm not able to get my javascript
work and also I couldn't load the following scripts loaded in my active x
window:
http://some.com/CSS/lst.css";>
http://some.com/tes
Trying to add file audit settings, but
the following is not working.
$file = new Win32::Perms("c:\\test.txt");
if ($file->AddAudit("Everyone",
ALL, SUCCESS || FAILURE)) {
print
("\nSet audit.\n");
} else {
print
("\nDid not set audit.\n");
}
Thanks - Chris
Image::Info can do it.
For examples, have a look at the photo gallery software available at
www.fuzzymonkey.org
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
This code:
use Win32::Ole;
my $voice = Win32::Ole->new("Speech.VoiceText");
$voice->Register('', 'Perl');
$voice->speak("hello world");
;# wait til it finishes speaking
has been used succesfully on Windows98 (with the
Microsoft Speech SDK installed) and on Windows 2000
(which has it inst
--8<---
has been used succesfully on Windows98 (with the
Microsoft Speech SDK installed) and on Windows 2000
(which has it installed by default, apparently).
The same code does not, however, work on Windows XP.
What has changed?
There IS a text-to-speech service on XP.
How do I co
I know I can use Eval, but I'm uncertain how to do it.
$x = "5+4*3-2+1";
I would like the program to give me the answer to the string math. How do I go
about it?
Shain
--
RPG-Edge Forum: http://rpg-edge.ketnar.org/vbb
Up and comming new singer-
Kendall Gaveck: http://launch.groups.yahoo.com/gro
- Original Message -
From: "Jon Bjornstad" <[EMAIL PROTECTED]>
To:
Sent: Tuesday, June 14, 2005 9:26 AM
Subject: Win32:OLE - Speech.VoiceText
> This code:
>
> use Win32::Ole;
> my $voice = Win32::Ole->new("Speech.VoiceText");
> $voice->Register('', 'Perl');
> $voice->speak("hello world
On Mon, 13 Jun 2005, Sisyphus wrote:
> - Original Message -
On Tue, 14 Jun 2005, "Jon Bjornstad" <[EMAIL PROTECTED]> wrote:
>
> > This code:
> >
> > use Win32::Ole;
> > my $voice = Win32::Ole->new("Speech.VoiceText");
> > $voice->Register('', 'Perl');
> > $voice->speak("hello world");
> >
- Original Message -
From: "Shain Edge" <[EMAIL PROTECTED]>
To:
Sent: Tuesday, June 14, 2005 11:06 AM
Subject: evaluating a math statement
> I know I can use Eval, but I'm uncertain how to do it.
>
> $x = "5+4*3-2+1";
>
Untested:
use warnings;
$x = "5+4*3-2+1";
print eval($x), "\n";
Shain Edge wrote:
> I know I can use Eval, but I'm uncertain how to do it.
>
> $x = "5+4*3-2+1";
>
> I would like the program to give me the answer to the string math. How do I go
> about it?
use strict;
use warnings;
my $x;
eval "\$x = 5+4*3-2+1"; # you need to escape $x so it's not interpolat
Sisyphus, Jan, all,
Right. I'm sitting here copying code between an un-networked Win98
laptop,
an XP machine and my Apple iBook and apologize for the sloppy copying.
This code does work on Win98 (with the Speech SDK installed)
and Win2000 (stock) but not on XP:
use Win::OLE;
my $voice = Wi
On Mon, 13 Jun 2005, Jon Bjornstad wrote:
> This code does work on Win98 (with the Speech SDK installed)
> and Win2000 (stock) but not on XP:
>
> use Win::OLE;
> my $voice = Win32::OLE->new('Speech.VoiceText');
> die "no voice: $!\n" unless $voice;
> $voice->Register('', 'Perl');
> while () {
>
- Original Message -
From: "Jon Bjornstad" <[EMAIL PROTECTED]>
To: "Jan Dubois" <[EMAIL PROTECTED]>
Cc: "'Sisyphus'" <[EMAIL PROTECTED]>;
Sent: Tuesday, June 14, 2005 1:13 PM
Subject: Re: Win32:OLE - Speech.VoiceText
> Sisyphus, Jan, all,
>
> Right. I'm sitting here copying code betw
> As well as looking at $!, you might also try looking at
> Win32::FormatMessage(Win32::GetLastError()), as that often gives much
> a better indication of the problem where windows processes are
> involved. (You have to 'use Win32;' to do that.)
You can use $^E instead of Win32::GetLastError(). I
Jon Bjornstad wrote:
> This code:
>
> use Win32::Ole;
> my $voice = Win32::Ole->new("Speech.VoiceText");
> $voice->Register('', 'Perl');
> $voice->speak("hello world");
> ;# wait til it finishes speaking
>
> has been used succesfully on Windows98 (with the
> Microsoft Speech SDK installed
16 matches
Mail list logo