RE: Perl/Tk application woes
Yeah, Carl is right, you don't need Xwindows software. So you're running
this on win2k?
try this exact script...
#Begin--
use Tk;
my $mw = MainWindow->new(-title => 'Hello World!!');
$mw->Button(-text => "Done!", -command => sub{exit})->pack();
MainLoop();
#End
For this script don't worry about the lines...
#!/usr/local/bin/perl -w\
use lib '/export/home/bwise/perl/lib/site_perl/5.005';
...that you had in your earlier script.
I don't see why having those in there would cause a problem, but I don't
think you *NEED* them in win2k. (I'm not sure if they even do anything in
win2k, I'm sure someone else can comment on this).
If you don't see it, make sure you check your task bar, it could possibly be
behind some other window.
If that doesn't work, lemme know. :)
-Casey Williams
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
Carl Jolley
Sent: Thursday, June 28, 2001 2:59 PM
To: byron wise
Cc: Casey Williams; [EMAIL PROTECTED];
[EMAIL PROTECTED]
Subject: Re: Perl/Tk application woes
On Thu, 28 Jun 2001, byron wise wrote:
> Thanks Casey for your response. I finally figured out what was wrong. I
> didn't have an x-window display on my Win2000!!
> So I got a demo from www.xwin32.com
>
> Currently I'm playing with the O'Reilly Perl/Tk book. I have one concern
> regarding the end user of any applications.
>
> It seems that the user (assuming they are running a windows OS) would have
> to download some x-window display and then using the x-window display
> execute the script from the command line. In this situation, I think
there
> are better alternatives for applications to be written in. One such
> language would be Java. Sure they need the JRE to execute the script but
> you can put the jar file on the network and they can run it from there.
> Plus, since it is running on their machine the response time to events and
> such is much faster than using an x-window. These seem to be some short
> commings to Perl/Tk apps.
>
> Please enlighten me with your wisdom.
>
Tk running on Windows does not require the X-window software.
[EMAIL PROTECTED]
All opinions are my own and not necessarily those of my employer
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Perl/Tk application woes
Byron, After reading your initial post, it seems you want to open a Tk window through a Webbrowser? Is that correct. If so, I don't think Tk is (or was ever) intended for that purpose. Though, I could be very wrong. Am I understanding your need properly? If you are wanting to 'put a file on the network', I assume you will want to create an application like Jack said. Adam -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Carl Jolley Sent: Thursday, June 28, 2001 2:59 PM To: byron wise Cc: Casey Williams; [EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: Re: Perl/Tk application woes On Thu, 28 Jun 2001, byron wise wrote: > Thanks Casey for your response. I finally figured out what was wrong. I > didn't have an x-window display on my Win2000!! > So I got a demo from www.xwin32.com > > Currently I'm playing with the O'Reilly Perl/Tk book. I have one concern > regarding the end user of any applications. > > It seems that the user (assuming they are running a windows OS) would have > to download some x-window display and then using the x-window display > execute the script from the command line. In this situation, I think there > are better alternatives for applications to be written in. One such > language would be Java. Sure they need the JRE to execute the script but > you can put the jar file on the network and they can run it from there. > Plus, since it is running on their machine the response time to events and > such is much faster than using an x-window. These seem to be some short > commings to Perl/Tk apps. > > Please enlighten me with your wisdom. > Tk running on Windows does not require the X-window software. [EMAIL PROTECTED] All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Perl-Win32-Users digest, Vol 1 #513 - 17 msgs
I noticed that a few of the members of this group have the send mail as HTML option ON in thier mail program. Could you please change your Tools/Options/Mail-Format/Message-Format to 'Plain text' instead of HTML? (Your mail program may have this setting under a different menu selection.) (Oh please, oh please, oh please?) :) Thanks, Don Messages that I noticed had HTML as well as plain text on todays digest ... "David McIntyre", <[EMAIL PROTECTED]>, [EMAIL PROTECTED] <[EMAIL PROTECTED]> - fini - ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Perl/Tk application woes
You don't need an Xserver to run perl/Tk on Win32. The users would, however, need perl and the Tk extension loaded onto their local machine. That's easy, just download and install everything in 10 minutes from ActiveState! Even if that isn't an option, you can still use some sort of perl2exe to convert it into machine code for distribution. Albeit, it will be a much, much bigger .exe than, say, a Delphi app. Another option (I think only for N*X users though) is the netscape perl/tk plugin, which will allow the app to be run within a netscape window. BTW, you either run perl/Tk from the command line, or you can link the .pl extension to run perl.exe on a double click in an explorer window. Jack PS..Yes, there are likely better options. But perl/Tk is easy, free and open source. What could be better :-) -Original Message- From: byron wise [mailto:[EMAIL PROTECTED]] It seems that the user (assuming they are running a windows OS) would have to download some x-window display and then using the x-window display execute the script from the command line. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Opera and "Open Default Browser", Hard Crash?
>system("c:/progra~1/opera/opera.exe $url");
Well this works perfectly fine - my problem is that there's no certifiable
way for me to know if I should get to this point. As mentioned, I try to
find the default browser using the Win32::API call - if Opera is set as the
default, then shortly after the Win32::API call, my program will crash
(because of Opera's MDI according to another subscriber).
Again, my problem is that I just blindly open the "default browser" without
knowing what it is. If I could find out what the default browser is before
I open it, then I can choose the right command for Opera.
Anyone know how to find out the name or path of the default browser?
--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Opera and "Open Default Browser", Hard Crash?
I use Opera as my default browser, have for a long time. Current version is
5.11.
I tried:
#Note the use of forward slashes
my $url = 'http://www.yahoo.com';
system("c:/progra~1/opera/opera.exe $url");
This started Opera. A window was up saying "Opera is not your default
browser, would you like to make it blah blah" This is weird, because it is
my default browser. I said yes, and opera finished loading. I then closed it
and tried starting it by double clicking the shortcut on the desktop. I got
the same message about it not being the default browser that time. I said
yes (again), then closed Opera. Ran the script again, and I did not get the
message about it not being my default browser.
Not sure what's going on. You could try
system("start c:/progra~1/opera/opera.exe $url");
That seemed to work for me. Maybe try sending an email to Opera? I found
this link on their site about command line switches.
http://www.opera.com/support/mastering/sysadmin/#commands
HTH.
___
Michael Prozinski
Interautomation, Inc.
email=> [EMAIL PROTECTED]
Dearborn => (313) 390-3855
Mobile => (734) 216-6875
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
Morbus Iff
Sent: Thursday, June 28, 2001 11:51 AM
To: [EMAIL PROTECTED]
Subject: Opera and "Open Default Browser", Hard Crash?
I'm getting hard crashes when I use a registry check against the default
browser. The program will request the default browser (in this case,
Opera), open the browser correctly, and display the page.
Mozilla/Netscape/IE work fine, but in the case of Opera, I get a infinitely
repeatable crash as soon as the page is done loading.
I've traced the bug to something within the call to the Windows registry.
A description and workaround is below.
a) Downloaded Opera 5.12 for Windows.
b) Opened it up, set it as the default browser.
That was the only configuration change.
c) Ran my program using the following code:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
$ShellExecute->Call(0, "open", $url, 0, 0, 1);
d) Opera opened up, displayed the main page, and program crashes.
Ok. Hmf.
c) Ran my program using the following code:
system("c:\progra~1\opera\opera.exe $url");
Opera opened up, displayed the main page, and birds sing.
The question is: why? And is there a workaround? Does the $ShellExecute
call return the path to the browser? Can I do something like:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
# pseudo code below
if ($ShellExecute->Path =~ /Opera/i) {
system("$ShellExecute->Path $url");
} else { $ShellExecute->Call(0, "open", $url, 0, 0, 1); }
Is something like that possible?
--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"
--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Toolkit for Apache
You can get "Toolkit for Apache" from http://www.innerdive.com/downloads/taws.zip The TAWS is freeware. It seems at first glance to be a nice interface for the Windows version of Apache Server. It even put an icaon in my tray when the Apache Server is Active, which is nice as I kept forgetting when/if it was active.
newbie WriteExcel.pm question
I am using the WriteExcel.pm to make a flat file available to users to download. When Windows 2000 users w/ 2000 office attempt to download they are getting an .xls file extension BUT when Windows NT users w/ '97 office try to download the same file they get an .htm file extension. I think this is the code it's getting hung up on: # Set the headers so the script knows to output in Excel format print "Content-type: application/vnd.ms-excel\n"; # This next line tells the script to offer to download it when it's done print "Content-Disposition: attachment; filename=$filename\n\n"; Has anyone run into this issue before? Any suggestions? Any help would be greatly appreciated! Pete C. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: format+Tk
> My PROBLEM:
> I want to insert a formatted test , I mean the resulting of the "format"
> command . if I use write every line will go on the STDOUT
> but I want to get all the columns well formatted inside the
> "$TextMessage".
perlform lead me to this:
---
use Carp;
sub swrite {
croak "usage: swrite PICTURE ARGS" unless @_;
my $format = shift;
$^A = "";
formline($format,@_);
return $^A;
}
$string = swrite(<<'END', $str, $%, "\$$num");
Test: @ @| @>
END
print $string;
---
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Opera and "Open Default Browser", Hard Crash?
I'm getting hard crashes when I use a registry check against the default
browser. The program will request the default browser (in this case,
Opera), open the browser correctly, and display the page.
Mozilla/Netscape/IE work fine, but in the case of Opera, I get a infinitely
repeatable crash as soon as the page is done loading.
I've traced the bug to something within the call to the Windows registry.
A description and workaround is below.
a) Downloaded Opera 5.12 for Windows.
b) Opened it up, set it as the default browser.
That was the only configuration change.
c) Ran my program using the following code:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
$ShellExecute->Call(0, "open", $url, 0, 0, 1);
d) Opera opened up, displayed the main page, and program crashes.
Ok. Hmf.
c) Ran my program using the following code:
system("c:\progra~1\opera\opera.exe $url");
Opera opened up, displayed the main page, and birds sing.
The question is: why? And is there a workaround? Does the $ShellExecute
call return the path to the browser? Can I do something like:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
# pseudo code below
if ($ShellExecute->Path =~ /Opera/i) {
system("$ShellExecute->Path $url");
} else { $ShellExecute->Call(0, "open", $url, 0, 0, 1); }
Is something like that possible?
--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"
--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: format+Tk
> My PROBLEM: > I want to insert a formatted test , I mean the resulting of the "format" > command . if I use write every line will go on the STDOUT > but I want to get all the columns well formatted inside the > "$TextMessage". > I know it is not clearbut if you manage to understand what I am trying > to say..please support me. Is the font in the window a fixed font? Something like Arial or Times New Roman will not line up correctly because every character does not take up the same amount of space. Ignoring that, it sounds like you want a filehandler to really be a variable in which case you'd need the IO::Scalar module: --- use IO::Scalar; tie *STDOUT, 'IO::Scalar', \$TextMessage; write(STDOUT); --- ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Time till millisecond
-Original Message-
From: Saxena, Saurabh
Sent: Thursday, June 28, 2001 8:47 PM
To: '[EMAIL PROTECTED]'
Subject: RE: Time till millisecond
Thanks Geoff
I have one problem.Actually in my code i am also using "use Time::localtime"
so when i am using this it is not printing the time correctly.I tried to put
the "use Time::HiRes qw(gettimeofday);" inside a function but also it is not
working,
##
use Time::localtime; -->This is causing problem
sub ti()
{
use Time::HiRes qw(gettimeofday);
my $t0 = [gettimeofday];
(my $seconds , my $milliseconds) = gettimeofday;
my @t = localtime(time);
return sprintf("%2s/%2s/%2s/%06s", $t[2], $t[1], $t[0], $milliseconds);
}
my $a=ti();
print "$a\n"; -->It's printing / /Time::tm=ARRAY(0x338b04)/92
###
##
sub ti()
{
use Time::HiRes qw(gettimeofday);
my $t0 = [gettimeofday];
(my $seconds , my $milliseconds) = gettimeofday;
my @t = localtime(time);
return sprintf("%2s/%2s/%2s/%06s", $t[2], $t[1], $t[0], $milliseconds);
}
my $a=ti();
print "$a\n"; -->It's printing the correct time 20/42/26/488000.
###
Is there any solution for this,
regards
Saurabh
-Original Message-
From: Geoff [mailto:[EMAIL PROTECTED]]
Sent: Thursday, June 28, 2001 8:07 PM
To: 'Saxena, Saurabh'; 'Perl1'; 'Perl2'
Subject: RE: Time till millisecond
use Time::HiRes qw(gettimeofday);
$t0 = [gettimeofday];
($seconds , $milliseconds) = gettimeofday;
@t = localtime(time);
$TIME = sprintf("%2s/%2s/%2s/%06s", $t[2], $t[1], $t[0], $milliseconds);
That should print your time out in
hour/min/sec/millisecond
HTH,
Geoff Ellis
Software Developer
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Saxena,
Saurabh
Sent: 28 June 2001 15:50
To: 'Perl1'; 'Perl2'
Subject: Time till millisecond
Hi
Is there any method in perl to get the time in form of "HHmmSSmil" ie
hour/min/sec/millisecond
regards
saurabh
___
Perl-XML mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-xml
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
format+Tk
Hi there,
I try to explain you my problem.
I have created a this window
.
.
my $mw = MainWindow->new( -title => 'TcpExplorer',);
my $TextFrame = $mw->Frame->pack (-expand =>"yes", -fill=>"both");
my $TextMessage = $TextFrame->Text(-width => 152,
-height => 45,
-borderwidth => 6,
-relief => "groove",
-wrap => "none",
-setgrid=> "true")->pack(-expand
=>"yes", -fill=>"both");
$TextFrame->AddScrollbars($TextMessage);
$TextFrame->configure(-scrollbars => 'se');
MainLoop();
.
.
.
to insert somthing in the widget I am using this sub
sub WindowResults
{
$TextMessage->configure (-state => "normal");
$TextMessage->insert('end', $_[0]);
$TextMessage->configure (-state => "disabled");
$TextMessage->update;
}
My PROBLEM:
I want to insert a formatted test , I mean the resulting of the "format"
command . if I use write every line will go on the STDOUT
but I want to get all the columns well formatted inside the
"$TextMessage".
I know it is not clearbut if you manage to understand what I am trying
to say..please support me.
BYE
Carlo
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Time till millisecond
use Time::HiRes qw(gettimeofday);
$t0 = [gettimeofday];
($seconds , $milliseconds) = gettimeofday;
@t = localtime(time);
$TIME = sprintf("%2s/%2s/%2s/%06s", $t[2], $t[1], $t[0], $milliseconds);
That should print your time out in
hour/min/sec/millisecond
HTH,
Geoff Ellis
Software Developer
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Saxena,
Saurabh
Sent: 28 June 2001 15:50
To: 'Perl1'; 'Perl2'
Subject: Time till millisecond
Hi
Is there any method in perl to get the time in form of "HHmmSSmil" ie
hour/min/sec/millisecond
regards
saurabh
___
Perl-XML mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-xml
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Time till millisecond
Hi Is there any method in perl to get the time in form of "HHmmSSmil" ie hour/min/sec/millisecond regards saurabh ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: how to access..to Access
> -Original Message- > Behalf Of bruno stefanutti > > Hi to all; I would like to access a Microsoft Access report trough perl > cgi script; I know there exists a WIN32 package to do this. > Anyone can suggest my the right approach? > Thanks in advance. A 'report' in Access is functionality specific to Access similar to a 'form'. If this is what you want to access then you will need to use OLE (Win32::OLE is the module.) The easiest way to start doing this would be to probably use Word (not Access) to create a macro which runs the report. This can be used as a framework for the necessary steps needed in perl. If on the other hand you want to create a report based on tables (and fields) then you will need to use one of the following: -Win32::ODBC module -DBI module and DBD::ODBC module. The first offers more power the second is more general. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: Active Perl NT -- How to send file as attachement or message body
##This always works for me
open(FILEHANDLE, "$file") || die "$!";
@file = ;
close(FILEHANDLE) || die "$!";
$smtp =
Net::SMTP->new('$server');
$smtp->mail($ENV{USER}); $smtp->to("$formdata{'email'}"); $smtp->data(); $smtp->datasend("To:
$email\n"); $smtp->datasend("From:
$webmaster\n"); $smtp->datasend("Subject:
$subject\n\n"); $smtp->datasend("Content-Type:
text/html\n\n");
foreach $line
(@file) { $smtp->datasend("$line"); } $smtp->dataend(); $smtp->quit;
--andyr--
Andy RamakrishnaChief
Architect/Technical SupportIntegrated NetDESIGN(573) 761-0675email:
[EMAIL PROTECTED]
- Original Message -
From:
gopal
To: [EMAIL PROTECTED]
Sent: Wednesday, January 27, 1999 7:42
AM
Subject: Active Perl NT -- How to send
file as attachement or message body
Hi,
I am able to send e-mail using sendmail.pm
Code
But i am trying to read file and then send that
file as message body ..
here i am not successful.. Please if any body
knows this help me..
my code as
use Mail::Sendmail;
# Get message into mesg variableopen
(FP,'c:\komodoprj\t.m') || die "Can't Open ";while (){ push
@msgbody, $_;}close(FP);
print $msgbody,"\n";
# $mail{smtp} =
'getafix.infogain.com';
%mail = ( To =>
'[EMAIL PROTECTED]',From
=> '[EMAIL PROTECTED]',Message
=> @msgbody;);
sendmail(%mail) or die
$Mail::Sendmail::error;# print "OK. Log says:\n",
$Mail::Sendmail::log;
# end of code
This is not working as i am
thinking..
Environment - NT 4 Active perl 5.6.1
Thanks in advance
gopal
Re: problem with PPM
Hi Download the zip file of DBI package from ActivePerl on your machine. Decompress this file in a folder. You should have a readme file with the command to type for install modules Sylvain David McIntyre a écrit : I need help. I am trying to install DBI on my NT machine. I have downloaded and installed Perl from ActivePerl. Now I want to install DBI but just typing PPM at the command prompt gives me the following errors. Element 'OPTIONS' doesn't allow the 'DOWNLOADSTATUS' attribute. at D:/Perl/lib/PPM.pm line 1704. Element 'OPTIONS' doesn't allow the 'VERBOSE' attribute. at D:/Perl/lib/PPM.pm line 1704. Element 'REPOSITORY' doesn't allow the 'SUMMARYFILE' attribute. at D:/Perl/lib/PPM.pm line 1704. Thanks. -- PLANCON Sylvain NAGORA Consultants 667, avenue Aristide Bergès 38330 MONTBONNOT Tel : +33 (0)4 76 52 99 10 Fax : +33 (0)4 76 52 99 19 E-mail : [EMAIL PROTECTED]
problem with PPM
Title: problem with PPM I need help. I am trying to install DBI on my NT machine. I have downloaded and installed Perl from ActivePerl. Now I want to install DBI but just typing PPM at the command prompt gives me the following errors. Element 'OPTIONS' doesn't allow the 'DOWNLOADSTATUS' attribute. at D:/Perl/lib/PPM.pm line 1704. Element 'OPTIONS' doesn't allow the 'VERBOSE' attribute. at D:/Perl/lib/PPM.pm line 1704. Element 'REPOSITORY' doesn't allow the 'SUMMARYFILE' attribute. at D:/Perl/lib/PPM.pm line 1704. Thanks.
Re: how to access..to Access
you can access the database via ODBC by either using Win32::ODBC or DBI / DBD::ODBC the link below appears to be a good starter for the latter The Perl You Need to Know: Part 6 "Dabbling in Live Databases: Microsoft Access" http://wdvl.com/Authoring/Languages/Perl/PerlfortheWeb/index6.html HTH till - Original Message - From: "bruno stefanutti" <[EMAIL PROTECTED]> To: "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]> Sent: Thursday, June 28, 2001 2:30 PM Subject: how to access..to Access > Hi to all; I would like to access a Microsoft Access report trough perl > cgi script; I know there exists a WIN32 package to do this. > Anyone can suggest my the right approach? > Thanks in advance. > > Bruno Stefanutti > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
AW: Install/Relocation perl build 626 > second try
Title: RE: Install/Relocation perl build 626 > second try
Thank
you very much!
Here
is my path statement.
set
pathPath=C:\Oracle\Ora81\bin;C:\Oracle\Ora81\Apache\Perl\5.00503\bin\mswin32-x86;C:\Programme\Oracle\jre\1.1.7\bin;C:\Oracle\Ora81\Apache\perl\5.00503\bin\;C:\WINNT\system32;C:\WINNT;C:\WINNT\System32\Wbem;PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH
I made
a search on ppm.* on the server. there are is a ppm.bat in
C:\Oracle\Ora81\Apache\Perl\5.00503\bin and a ppm.pm
C:\Oracle\Ora81\Apache\Perl\5.00503\site\lib.
If I run ppm within oracle / ... perl
.. directory , it installs
successfully, but the installed modules are not fount, when I run a
perl-program.
I
think, I have two perl versions, but where, and I did try to install activeperl
into the directory of the older version which came with
oracle.
perl
-v
gives
the older version 5.005_03
I
think, that I will remove the perl installation, delete all files and
directories, created by oracle and install perl again within the default
path.
Thanks
Franz
Franz Nowak Mail: [EMAIL PROTECTED] Tel:
+43(0676)4115490 Private Network Solutions
GmbH www.prinetsol.com Dr.Ludwig-Riegerstr. 7 A-2340 Mödling Austria / EU
-Ursprüngliche Nachricht-Von: Marc Weinmann
[mailto:[EMAIL PROTECTED]]Gesendet: Donnerstag, 28.
Juni 2001 13:51An: '[EMAIL PROTECTED]';
[EMAIL PROTECTED]Betreff: RE:
Install/Relocation perl build 626 > second try
I know its a silly question, but whats your path statement
look like. Can ya paste the output of a 'set PATH' from a console
window?
And how are you running ppm, are you just typing 'ppm'(in
which case you're probably getting whatever ppm.bat is in the path), or are
you doing 'perl ppm.pl'?
marc
-Original Message- From:
[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Thursday, June 28, 2001 1:44 AM To: [EMAIL PROTECTED] Subject: Install/Relocation perl build 626 > second try
Hello, Oracle 8.1.7 installs it's own
(older) perl version within the apache directory
during installation. I am using
activestate.perl.build.626 on win2000 professional. No problem
relocating to an other directory and using perl and ppm. the
path and @INC seems to be OK. But on one windows 2000 server system I have the problem that
after installing activeperl and relocating to that
directory , befor and after and restarting the system,
the perl-location is not recogized. I tried installing
several times but had no success.
eg: running ppm I get syntax error at
C:\Oracle\Ora81\Apache\Perl\5.00503\lib/warnings.pm line 306, ne ar "{^" syntax
error at C:\Oracle\Ora81\Apache\Perl\5.00503\lib/warnings.pm line
311, ne ar "{^" BEGIN failed--compilation aborted at C:\Oracle\Ora81\Apache\Perl\5.00503\lib/var s.pm line 12. BEGIN failed--compilation aborted
at C:\Oracle\Ora81\Apache\Perl\5.00503\lib/Get
opt/Long.pm line 37. BEGIN
failed--compilation aborted at C:\Oracle\Ora81\Apache\perl\5.00503\bin\ppm line 3.
What am I doing wrong? Kind
regards Franz
Franz Nowak Mail:
[EMAIL PROTECTED] Tel: +43(0676)4115490
Private Network Solutions GmbH www.prinetsol.com Dr.Ludwig-Riegerstr. 7 A-2340 Mödling
Austria / EU
___
Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: problem trapping command output
Thanks guys. Thats what I was after. Maybe this is a stupid question, but
I'll ask it anyway...
Is there some way of telling when an application is sending output to
STDERR and not STDOUT? Is it just a case of try STDERR if nothing on
STDOUT?
rotaiv <[EMAIL PROTECTED]>
Sent by: To:
[EMAIL PROTECTED]
[EMAIL PROTECTED]cc:
eState.com Subject: Re:
problem trapping command output
06/28/2001 07:57 AM
For a quick answer, see below (taken from Perl Cookbook 16.7. Reading
STDERR from a Program):
@result = `c:\\gzip\\gzip.exe -d c:\\gzip\\readme.gz 2>&1`;
foreach $line(@result) {
print "the output of the command is $line";
}
(Note: I dropped the '\n' on the print line as the output usually has it's
own line feeds).
For a more detailed explanation, see below:
Each program has the capability of generating output to STDOUT and
STDERR. By default, when you redirect output, you will only get
STDOUT. The version of gzip that I use sends errors messages to STDERR and
not STDOUT. Therefore, to capture STDERR on NT, you need to use the '2>'
redirection command.
NT also allows you to use the '&1' parameter to tell the second redirect
command to send the output where ever the first redirect command is sending
it's output. For example, to log all output from gzip to a log file, you
would use the following:
gzip.exe -d readme.gz > logfile.txt 2>&1
This tells NT to send STDOUT to logfile.txt and send STDERR to where ever
STDOUT is going (which in this case would also be logfile.txt). Naturally,
UNIX shells have the same capability but the syntax changes depending on
what shell you are using.
rotaiv
At 06/27/2001 03:33 PM, [EMAIL PROTECTED] wrote:
>Hi,
>running winnt/2k AS perl build 623
>I've been ftp'ing files across a wan link, and unzipping them with gzip.
>Occasionally, the file gets corrupted. I wanted to add some error checking
>to my script to not try to process the file if gzip could not unzip it,
for
>whatever reason.
>
>so I tried doing something like this:
>
>@result = `c:\\gzip\\gzip.exe -d c:\\gzip\\readme.gz`;
>
>foreach $line(@result)
>{
> print "the output of the command is $line\n";
>}
>
>now readme.gz is a file I intentionally corrupted(to get output from
gzip).
>The output of gzip run against this file from the cmd line is:
>
>gzip: c:\gzip\readme.gz: invalid compressed data--crc error
>
>but the above code fragment produces no output. I would have expected the
>print statement in the above code fragment to be executed. Any clues
>appreciated.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: problem trapping command output
For a quick answer, see below (taken from Perl Cookbook 16.7. Reading
STDERR from a Program):
@result = `c:\\gzip\\gzip.exe -d c:\\gzip\\readme.gz 2>&1`;
foreach $line(@result) {
print "the output of the command is $line";
}
(Note: I dropped the '\n' on the print line as the output usually has it's
own line feeds).
For a more detailed explanation, see below:
Each program has the capability of generating output to STDOUT and
STDERR. By default, when you redirect output, you will only get
STDOUT. The version of gzip that I use sends errors messages to STDERR and
not STDOUT. Therefore, to capture STDERR on NT, you need to use the '2>'
redirection command.
NT also allows you to use the '&1' parameter to tell the second redirect
command to send the output where ever the first redirect command is sending
it's output. For example, to log all output from gzip to a log file, you
would use the following:
gzip.exe -d readme.gz > logfile.txt 2>&1
This tells NT to send STDOUT to logfile.txt and send STDERR to where ever
STDOUT is going (which in this case would also be logfile.txt). Naturally,
UNIX shells have the same capability but the syntax changes depending on
what shell you are using.
rotaiv
At 06/27/2001 03:33 PM, [EMAIL PROTECTED] wrote:
>Hi,
>running winnt/2k AS perl build 623
>I've been ftp'ing files across a wan link, and unzipping them with gzip.
>Occasionally, the file gets corrupted. I wanted to add some error checking
>to my script to not try to process the file if gzip could not unzip it, for
>whatever reason.
>
>so I tried doing something like this:
>
>@result = `c:\\gzip\\gzip.exe -d c:\\gzip\\readme.gz`;
>
>foreach $line(@result)
>{
> print "the output of the command is $line\n";
>}
>
>now readme.gz is a file I intentionally corrupted(to get output from gzip).
>The output of gzip run against this file from the cmd line is:
>
>gzip: c:\gzip\readme.gz: invalid compressed data--crc error
>
>but the above code fragment produces no output. I would have expected the
>print statement in the above code fragment to be executed. Any clues
>appreciated.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Install/Relocation perl build 626 > second try
Title: RE: Install/Relocation perl build 626 > second try
I know its a silly question, but whats your path statement look like. Can ya paste the output of a 'set PATH' from a console window?
And how are you running ppm, are you just typing 'ppm'(in which case you're probably getting whatever ppm.bat is in the path), or are you doing 'perl ppm.pl'?
marc
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Thursday, June 28, 2001 1:44 AM
To: [EMAIL PROTECTED]
Subject: Install/Relocation perl build 626 > second try
Hello,
Oracle 8.1.7 installs it's own (older) perl version within the apache
directory during installation.
I am using activestate.perl.build.626 on win2000 professional. No problem
relocating to an other directory and using perl and ppm. the path and @INC
seems to be OK.
But on one windows 2000 server system I have the problem that after
installing activeperl and relocating to that directory , befor and after and
restarting the system, the perl-location is not recogized.
I tried installing several times but had no success.
eg: running ppm I get
syntax error at C:\Oracle\Ora81\Apache\Perl\5.00503\lib/warnings.pm line
306, ne
ar "{^"
syntax error at C:\Oracle\Ora81\Apache\Perl\5.00503\lib/warnings.pm line
311, ne
ar "{^"
BEGIN failed--compilation aborted at
C:\Oracle\Ora81\Apache\Perl\5.00503\lib/var
s.pm line 12.
BEGIN failed--compilation aborted at
C:\Oracle\Ora81\Apache\Perl\5.00503\lib/Get
opt/Long.pm line 37.
BEGIN failed--compilation aborted at
C:\Oracle\Ora81\Apache\perl\5.00503\bin\ppm
line 3.
What am I doing wrong?
Kind regards
Franz
Franz Nowak
Mail: [EMAIL PROTECTED]
Tel: +43(0676)4115490
Private Network Solutions GmbH
www.prinetsol.com
Dr.Ludwig-Riegerstr. 7
A-2340 Mödling
Austria / EU
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: Installing Microsoft ODBC driver for Oracle 8i
Title: Re: Installing Microsoft ODBC driver for Oracle 8i Hello, I am not getting too far installing the ODBC driver from Microsoft for ORACLE. I have been looking at Q175018 off the Microsoft support web site. I have downloaded the MDAC 2.1.1.4202.3 (GA) and installed it. But when I go to the ODBC Manager in the control panel and look under the drivers tab I do not see the driver installed??? I am sure I have missed something but can not seem to put my finger on it. I would appreciate it if someone could point out my mistake. Many thanks in advance, Jonathan
Access at environment variables
Hi Anyone knows how to access at environment variables with a CGI written in Perl. Cheer, Sylvain ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
