[28608] in Perl-Users-Digest
Perl-Users Digest, Issue: 9972 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Nov 16 14:05:46 2006
Date: Thu, 16 Nov 2006 11:05:07 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 16 Nov 2006 Volume: 10 Number: 9972
Today's topics:
Devel::StackTrace <b-patton@ti.com>
Re: FAQ 7.7 : bug ? <mritty@gmail.com>
Re: FAQ 7.7 : bug ? <benmorrow@tiscali.co.uk>
Re: how to automate installation of a MSI file using pe <hara.acharya@gmail.com>
How to retain only unique elements? <sagar.s@in.bosch.com>
Re: How to retain only unique elements? <mritty@gmail.com>
Re: performance: pcre vs perl regex <glennj@ncf.ca>
Re: performance: pcre vs perl regex <benmorrow@tiscali.co.uk>
Re: Perl Packager, pp, compilation <benmorrow@tiscali.co.uk>
Perl Script to change IPs to DNS Names <Holleran.Kevin@gmail.com>
Re: Perl Script to change IPs to DNS Names <fiedlert@gmail.com>
Re: Perl Script to change IPs to DNS Names <Holleran.Kevin@gmail.com>
Re: Perl Script to change IPs to DNS Names <Holleran.Kevin@gmail.com>
print to terminal <alexxx.magni@gmail.com>
Re: print to terminal <thepoet_nospam@arcor.de>
Re: Problem in calling two perl scripts one after the o <scobloke2@infotop.co.uk>
Re: Problem in calling two perl scripts one after the o (reading news)
Re: problems while compiling perl on solaris 10 anno4000@radom.zrz.tu-berlin.de
Re: problems while compiling perl on solaris 10 <josef.moellers@fujitsu-siemens.com>
Re: problems while compiling perl on solaris 10 <mark.clementsREMOVETHIS@wanadoo.fr>
Re: Tk- getOpenFile sticks on W2K server <lev.weissman@creo.com>
Win32::GUI or Tk ? <lev.weissman@creo.com>
Re: Win32::GUI or Tk ? <rvtol+news@isolution.nl>
Re: Win32::GUI or Tk ? <tzz@lifelogs.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 16 Nov 2006 09:35:04 -0600
From: "Billy N. Patton" <b-patton@ti.com>
Subject: Devel::StackTrace
Message-Id: <eji0f8$34f$1@home.itg.ti.com>
I'm trying to use Devel::StackTrace 1.13
I have a module that I want to limit it's scope to reporting just one
module.
I can't even get it to limit according to the docs.
Here is my subroutine that calls it.
sub debug(;$$)
{
my ($msg,$level) = @_;e
return unless $::Debug;
$level = 1 unless defined $level;
return unless $level <= $::Debug;
my @ignore_packages = qw (
HTML
GenDeck
);
my $trace = Devel::StackTrace->new(ignore_class =>
\@ignore_packages
,ignore_package =>
\@ignore_packages
);
my $line = (caller(0))[2];
my $caller = (caller(1))[3];
print STDOUT ' ' x $level;
print STDOUT "$caller from line# $line\n";
print STDOUT $trace->as_string;
}
Sorry I can't send more but it's too much stuff. The first 2 print
STDOUT are hold overs from the original debug calls. THen I started
trying to use Devel::StackTrace. This will trim down once I get the
stack trace working.
------------------------------
Date: 16 Nov 2006 05:57:35 -0800
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: FAQ 7.7 : bug ?
Message-Id: <1163685455.028304.167770@h54g2000cwb.googlegroups.com>
Sherm Pendley wrote:
> Michele Dondi <bik.mido@tiscalinet.it> writes:
>
> > On 15 Nov 2006 13:31:27 -0800, "cmic" <cmic@caramail.com> wrote:
> >
> >>------8<-------------------from FAQ 7.7-------------
> >>Although it has the same precedence as in C, Perl's "?:" operator
> >>produces an lvalue.
> >>----------8<-----------------
> >>
> On the other hand, the "although" at the beginning implies that you can't
> do the same thing in C, which *is* false.
No, it implies simply that C's ?: does not return an lvalue, not that
you can't coerce the language into doing something that looks similiar
and produces the same results.
> It can be done, all it takes is some pointer gymnastics:
>
> #include <stdio.h>
>
> int main() {
> int foo;
> int bar;
>
> *( 1 ? &foo : &bar ) = 5;
> *( 0 ? &foo : &bar ) = 10;
>
> printf("Foo: %d\nBar: %d\n", foo, bar);
> }
>
> Produces this output:
>
> Foo: 5
> Bar: 10
Neither of those ?: are lvalues. You're not assigning to their return
values. You're returning them to the * operator, and that operator
produces an lvalue.
Paul Lalli
------------------------------
Date: Thu, 16 Nov 2006 03:56:27 +0000
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: FAQ 7.7 : bug ?
Message-Id: <b44t24-jbj.ln1@osiris.mauzo.dyndns.org>
Quoth Sherm Pendley <spamtrap@dot-app.org>:
> Michele Dondi <bik.mido@tiscalinet.it> writes:
>
> > On 15 Nov 2006 13:31:27 -0800, "cmic" <cmic@caramail.com> wrote:
> >
> >>I am not a Perl Expert but I find that this assertion is false :
> >>
> >>------8<-------------------from FAQ 7.7-------------
> >>Although it has the same precedence as in C, Perl's "?:" operator
> >
> > It's not a typo and the assertion is not false. The whole point about
> > it is that it claims that C<?:> returns an *lvalue*, and the example
>
> On the other hand, the "although" at the beginning implies that you can't
> do the same thing in C, which *is* false.
No it's not.
> It can be done, all it takes is
> some pointer gymnastics:
>
> #include <stdio.h>
>
> int main() {
> int foo;
> int bar;
>
> *( 1 ? &foo : &bar ) = 5;
&foo is not an lvalue to begin with: that is, you cannot say
&foo = 3;
The value of the ?: expression is an rvalue; this rvalue then has the *
operator applied to it, which *does* produce an lvalue. The difference
from Perl is that even if both branches of the ?: *are* lvalues, for
instance
( 1 ? foo : bar )
you cannot then assign to the result.
Ben
--
Many users now operate their own computers day in and day out on various
applications without ever writing a program. Indeed, many of these users
cannot write new programs for their machines...
-- F.P. Brooks, 'No Silver Bullet', 1987 [benmorrow@tiscali.co.uk]
------------------------------
Date: 16 Nov 2006 01:20:21 -0800
From: "king" <hara.acharya@gmail.com>
Subject: Re: how to automate installation of a MSI file using perl
Message-Id: <1163665790.252937.203380@b28g2000cwb.googlegroups.com>
I went through the links but what i want is that
My MSI set up file installation asks for a lot of user inputs in
between the installation process. So i want to send those informations
also using perl automation script.
Can I do that using perl. And how to enable radio buttons and check
boxes using perl script.
Thanks in advance
Regards
John Bokma wrote:
> "king" <hara.acharya@gmail.com> wrote:
>
> > Is dere any module in perl using which we can automate the installation
> > of MSI file.
>
> http://www.google.com/search?q=msi%20command%20line
>
> perldoc -f system
>
> --
> John Experienced Perl programmer: http://castleamber.com/
>
> Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Thu, 16 Nov 2006 17:47:11 +0530
From: "Sagar S" <sagar.s@in.bosch.com>
Subject: How to retain only unique elements?
Message-Id: <ejhkiu$jpj$1@news4.fe.internet.bosch.com>
Hello all,
I am a newbie to Perl and now I am stuck with a problem (which may seem
simple to all the Perl Gurus out there ;-) )
I am having a list like (XYZ_A(8::7), XYZ_B(4,15), XYZ_C(4,6), XYZ_A(8,9),
XYZ_A(6,15), XYZ_B(8,10) ) for example.
The problem is I have to retain only one element of each kind (XYZ_A, XYZ_B,
XYZ_C etc) such that for each kind, only those which have the lowest first
number are retained. I mean, after processing, the list should be
(XYZ_B(4,15), XYZ_C(4,6), XYZ_A(6,15))
I will really appreciate any help in this direction, probably a code snippet
or some hints atleast.
------------------------------
Date: 16 Nov 2006 05:46:01 -0800
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: How to retain only unique elements?
Message-Id: <1163684761.193719.3370@m7g2000cwm.googlegroups.com>
Sagar S wrote:
> I am a newbie to Perl and now I am stuck with a problem (which may seem
> simple to all the Perl Gurus out there ;-) )
> I am having a list like (XYZ_A(8::7), XYZ_B(4,15), XYZ_C(4,6), XYZ_A(8,9),
> XYZ_A(6,15), XYZ_B(8,10) ) for example.
That is not an example. That's not Perl code. I have no idea what
your list actually contains. Please speak Perl, not English.
> The problem is I have to retain only one element of each kind (XYZ_A, XYZ_B,
> XYZ_C etc) such that for each kind, only those which have the lowest first
> number are retained. I mean, after processing, the list should be
> (XYZ_B(4,15), XYZ_C(4,6), XYZ_A(6,15))
>
> I will really appreciate any help in this direction, probably a code snippet
> or some hints atleast.
What have you tried so far? How did it fail to work for you?
If you have a list of strings, first define a hash whose key is the
unique identifier and whose value is the whole string. Loop through
that list, parse out the unique identifier and the first number, using
a regular expression. Compare the first number of the current string
to the first number of the saved value in the hash. If the current
string is lower, save the current string to the hash. When the loop is
done, your unique values will be found from the values() function, with
your hash as an argument.
Once you've made an attempt, if it doesn't work, post a
short-but-complete script here, and we can probably help you fix it.
Paul Lalli
------------------------------
Date: 16 Nov 2006 16:55:48 GMT
From: Glenn Jackman <glennj@ncf.ca>
Subject: Re: performance: pcre vs perl regex
Message-Id: <slrnelp60l.ib2.glennj@smeagol.ncf.ca>
At 2006-11-15 05:37PM, "Mirco Wahab" wrote:
> (my) rule of thumb: If it contains alterations,
> TCL will win, Perl comes last - otherwise
> Perl comes first or is hairwidth behind
> TCL.
ITIYM "alternations"
--
Glenn Jackman
Ulterior Designer
------------------------------
Date: Thu, 16 Nov 2006 03:58:45 +0000
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: performance: pcre vs perl regex
Message-Id: <l84t24-jbj.ln1@osiris.mauzo.dyndns.org>
Quoth wahab-mail@gmx.net:
> Thus spoke gmlvsk2@gmail.com (on 2006-11-15 22:36):
>
> > Does anybody know difference in performance if
> > 1) I use C with pcre library
> > 2) I use perl
>
> 3) use TCL
>
> > For the same regular expressions looped many times, with remembering
> > values in parentesis would 1 be sevaral times faster or vice versa
>
> (my) rule of thumb: If it contains alterations,
> TCL will win, Perl comes last
Have you tried this with the new trie optimizations in bleadperl? I
would be (very slightly) interested to know if they make a difference.
Ben
--
If I were a butterfly I'd live for a day, / I would be free, just blowing away.
This cruel country has driven me down / Teased me and lied, teased me and lied.
I've only sad stories to tell to this town: / My dreams have withered and died.
benmorrow@tiscali.co.uk (Kate Rusby)
------------------------------
Date: Thu, 16 Nov 2006 03:44:40 +0000
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Perl Packager, pp, compilation
Message-Id: <8e3t24-jbj.ln1@osiris.mauzo.dyndns.org>
Quoth mathieu.lory@gmail.com:
> Ben Morrow a écrit :
> > You don't use -A for dependant libraries, you use -l, e.g.
> > pp -o mozembed -l gtkembedmoz mozembed.pl
>
> Thanks for your help Ben, It's work now. But I've another strange error
> : my application crash at startup, with only 2 warnings :
>
> *** This build of Glib was compiled with glib 2.9.5, but is currently
> running with 2.8.3, which is too old. We'll continue, but expect
> problems!
> *** This build of Gtk2 was compiled with gtk+ 2.8.16, but is currently
> running with 2.8.6, which is too old. We'll continue, but expect
> problems!
>
> So, I don't understand the problem, because As I know, all the libs are
> included to the package, so it can't be a problem of version ! no ?
Did you include *all* the required libraries? On my system, a program
which links libgtkembedmoz.so needs at least
-lgtkembedmoz -lxpcom -lplds4 -lplc4 -lnspr4 -lgtk-x11-2.0
-lgdk-x11-2.0 -latk-1.0 -lgdk_pixbuf-2.0 -lpangocairo-1.0
-lpango-1.0 -lcairo -lgobject-2.0 -lgmodule-2.0 -lglib-2.0
(along with some runtime linker flags to let it find those libraries),
plus a whole lot of other stuff like -lglitz and -lexpat that those
libraries pull in, plus a whole lot more stuff like -lm, -ldl and -lX11
that are definitely part of the operating system and which it would be a
very bad idea to attempt to put in a package.
Now that I've thought about it a little further, what you are trying to
do is likely to be rather difficult. You need to decide what you are
going to require the client to have installed: gtkembedmoz? Mozilla?
Gtk? Gdk? Glib? X? Things you require to be present on the client system
will obviously have to be the correct version, so you will need to find
out what those need to be. Things you don't require to be present you
must include; and you will need to include all their dependencies. You
can use the ldd tool to find these if you are on Linux; if you aren't
I'm sure there is some equivalent tool for your platform. You must also
be aware that if you package something (say, Mozilla) and the client
already has it installed, then things may not work as the user expects.
For instance, any plugins they have installed may or may not be found by
your packaged version; and they may or may not work correctly. In the
worst case, your packaged version will find some plugin or some user
setting that is incompatible and causes it to break.
> then, for Gtk2 : "was compiled with gtk+ 2.8.16, but is currently
> running with 2.8.6, which is too old" => 2.8.16 is older than 2.8.6 ?
> really ?
No, it's saying 2.8.6 is too old, as 2.8.6 is older than 2.8.16. The
sentence is not terribly clear, so if English is not your native tongue
I'm not surprised you misunderstood it :).
Ben
--
The cosmos, at best, is like a rubbish heap scattered at random.
Heraclitus
benmorrow@tiscali.co.uk
------------------------------
Date: 16 Nov 2006 07:56:34 -0800
From: "K.J. 44" <Holleran.Kevin@gmail.com>
Subject: Perl Script to change IPs to DNS Names
Message-Id: <1163692594.518095.119720@e3g2000cwe.googlegroups.com>
Hi,
I am very new to Perl. I have worked through the Llama.
I have a free Syslog server that saves the syslog messages to a text
file. What I would like to do is have a perl script that runs say,
every hour or 1/2 hour that goes through the text file, looks at the
syslog message, checks to see if there is an IP address, then queries
the DNS to find the computer name for that IP and adds that to the
message. I would also like to be able to add who was currently logged
into the PC to the message.
How would I go about querying DNS and finding out who is logged in? I
am in a Windows 2k3 environment with all XP SP2 machines. I do not
have the ability to run ISA as a proxy to accomplish this type of thing
so I was hoping I could write a Perl Script.
Thanks.
------------------------------
Date: 16 Nov 2006 09:06:40 -0800
From: "fiedlert@gmail.com" <fiedlert@gmail.com>
Subject: Re: Perl Script to change IPs to DNS Names
Message-Id: <1163696800.305825.115380@h48g2000cwc.googlegroups.com>
perldoc -f gethostbyaddr
will give you a start.
K.J. 44 wrote:
> Hi,
>
> I am very new to Perl. I have worked through the Llama.
>
> I have a free Syslog server that saves the syslog messages to a text
> file. What I would like to do is have a perl script that runs say,
> every hour or 1/2 hour that goes through the text file, looks at the
> syslog message, checks to see if there is an IP address, then queries
> the DNS to find the computer name for that IP and adds that to the
> message. I would also like to be able to add who was currently logged
> into the PC to the message.
>
> How would I go about querying DNS and finding out who is logged in? I
> am in a Windows 2k3 environment with all XP SP2 machines. I do not
> have the ability to run ISA as a proxy to accomplish this type of thing
> so I was hoping I could write a Perl Script.
>
> Thanks.
------------------------------
Date: 16 Nov 2006 10:53:47 -0800
From: "K.J. 44" <Holleran.Kevin@gmail.com>
Subject: Re: Perl Script to change IPs to DNS Names
Message-Id: <1163703227.103088.148570@h54g2000cwb.googlegroups.com>
Great thanks! Also thanks to tkunau for his suggestions at the
implementation of gethostbyaddr.
Is there also a way to query for the username of the person logged into
that computer? Like the VBScript
Set objNetwork = WScript.CreateObject("WScript.Network")
strUserName = objNetwork.UserName
Thanks!
fiedlert@gmail.com wrote:
> perldoc -f gethostbyaddr
>
> will give you a start.
> K.J. 44 wrote:
> > Hi,
> >
> > I am very new to Perl. I have worked through the Llama.
> >
> > I have a free Syslog server that saves the syslog messages to a text
> > file. What I would like to do is have a perl script that runs say,
> > every hour or 1/2 hour that goes through the text file, looks at the
> > syslog message, checks to see if there is an IP address, then queries
> > the DNS to find the computer name for that IP and adds that to the
> > message. I would also like to be able to add who was currently logged
> > into the PC to the message.
> >
> > How would I go about querying DNS and finding out who is logged in? I
> > am in a Windows 2k3 environment with all XP SP2 machines. I do not
> > have the ability to run ISA as a proxy to accomplish this type of thing
> > so I was hoping I could write a Perl Script.
> >
> > Thanks.
------------------------------
Date: 16 Nov 2006 10:55:10 -0800
From: "K.J. 44" <Holleran.Kevin@gmail.com>
Subject: Re: Perl Script to change IPs to DNS Names
Message-Id: <1163703306.745870.153630@h54g2000cwb.googlegroups.com>
BUt of course this would be run on the computerName that is acheived by
the gethostbyaddr....
Thanks.
K.J. 44 wrote:
> Great thanks! Also thanks to tkunau for his suggestions at the
> implementation of gethostbyaddr.
>
> Is there also a way to query for the username of the person logged into
> that computer? Like the VBScript
>
> Set objNetwork = WScript.CreateObject("WScript.Network")
> strUserName = objNetwork.UserName
>
> Thanks!
>
> fiedlert@gmail.com wrote:
> > perldoc -f gethostbyaddr
> >
> > will give you a start.
> > K.J. 44 wrote:
> > > Hi,
> > >
> > > I am very new to Perl. I have worked through the Llama.
> > >
> > > I have a free Syslog server that saves the syslog messages to a text
> > > file. What I would like to do is have a perl script that runs say,
> > > every hour or 1/2 hour that goes through the text file, looks at the
> > > syslog message, checks to see if there is an IP address, then queries
> > > the DNS to find the computer name for that IP and adds that to the
> > > message. I would also like to be able to add who was currently logged
> > > into the PC to the message.
> > >
> > > How would I go about querying DNS and finding out who is logged in? I
> > > am in a Windows 2k3 environment with all XP SP2 machines. I do not
> > > have the ability to run ISA as a proxy to accomplish this type of thing
> > > so I was hoping I could write a Perl Script.
> > >
> > > Thanks.
------------------------------
Date: 16 Nov 2006 02:54:23 -0800
From: "alexxx.magni@gmail.com" <alexxx.magni@gmail.com>
Subject: print to terminal
Message-Id: <1163674463.086906.46580@m7g2000cwm.googlegroups.com>
hi people,
I need to print to terminal a long $variable containing text, and of
course being longer than the terminal width it produces a truncated
word that continues on the next line - I'd like to go newline just on
spaces...
I wrote an approximated version to "prettyprint" it, but it's so awful
that I prefer not to show it in public...
Do you know of some elegant way to do it? (there should be more than
one way...;-)
thanks!
Alessandro Magni
------------------------------
Date: Thu, 16 Nov 2006 12:02:30 +0100
From: Christian Winter <thepoet_nospam@arcor.de>
Subject: Re: print to terminal
Message-Id: <455c4546$0$18833$9b4e6d93@newsspool4.arcor-online.net>
alexxx.magni@gmail.com wrote:
> hi people,
> I need to print to terminal a long $variable containing text, and of
> course being longer than the terminal width it produces a truncated
> word that continues on the next line - I'd like to go newline just on
> spaces...
>
> I wrote an approximated version to "prettyprint" it, but it's so awful
> that I prefer not to show it in public...
>
> Do you know of some elegant way to do it? (there should be more than
> one way...;-)
Have a look at the Text::Wrap module.
-Chris
------------------------------
Date: Thu, 16 Nov 2006 09:46:04 +0000
From: Ian Wilson <scobloke2@infotop.co.uk>
Subject: Re: Problem in calling two perl scripts one after the other using "exec"
Message-Id: <cNqdnbusHdT_rsHYnZ2dnUVZ8tidnZ2d@bt.com>
saki80@gmail.com wrote:
> Hi,
> Thanks for the response..I don't want to pass all the command line
> arguments to both the scripts, instead i want to pass 2nd argument to
> b.pl & 1,3 arguments to c.pl...could u tell me how can i do this...
>
Don't you read the responses to your questions?
I already posted an example showing how to do this!
------------------------------
Date: Thu, 16 Nov 2006 14:42:46 GMT
From: "Mumia W. (reading news)" <paduille.4060.mumia.w@earthlink.net>
Subject: Re: Problem in calling two perl scripts one after the other using "exec"
Message-Id: <GN_6h.7357$L6.2548@newsread3.news.pas.earthlink.net>
On 11/15/2006 08:20 AM, saki80@gmail.com wrote:
> Hi All,
> I am calling perl scripts b.pl & c.pl from a.pl which takes three
> arguments. I want to pass these command line arguments to b.pl & c.pl
> also. so i could not do this by using 'system'. so ito continue my
> work that time i hardcoded the parameters while calling b.pl & c.pl as
> shown below
>
> a.pl 1.1.1.1 1.1.1.2 1.1.1.3
> a.pl
> =========
> ..
> ..
> ..
>
> system('b.pl', ip_address1);
> system('c.pl', ip_address2, ip_address3);
>
> where ip_address1, ip_address2 & ip_address3 are hardcoded vaules...
>
> but if i use 'exec' in place of 'system', i could make use of the
> ARGV(command line arguments for a.pl) as command line arguments for
> b.pl & c.pl...
>
> a.pl 1.1.1.1 1.1.1.2 1.1.1.3
> a.pl
> =========
> ..
> ..
> ..
>
> exec "b.pl", $ARGV[1];
> exec "c.pl", $ARGV[0], $ARGV[2];
>
> but the problem is if i call two exec's , only one is getting
> called..but if i use one at a time by commenting the other it is
> working fine.
>
> How can i call two exec one after the other so that both will execute.
>
> Rgds
> SaiKiran
>
Why not see if you can use $ARGV[...] with system?
--
paduille.4060.mumia.w@earthlink.net
------------------------------
Date: 16 Nov 2006 08:53:16 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: problems while compiling perl on solaris 10
Message-Id: <4s2n7sFt898tU1@mid.dfncis.de>
ashish <ashish.sarika@gmail.com> wrote in comp.lang.perl.misc:
Top posting corrected. You are not new here, you should know how it
works.
> anno4000@radom.zrz.tu-berlin.de wrote:
> > ashish <ashish.sarika@gmail.com> wrote in comp.lang.perl.misc:
> > > Hi,
> > >
> > > When I try to compile perl on Solaris 10, I get the following error
> > > message :
> > >
> > >
> > > Use which C compiler? [cc] /usr/sfw/bin/gcc
> >
> > [...]
> >
> > > Uh-oh, the C compiler '/usr/sfw/bin/gcc' doesn't seem to be working.
> > > You need to find a working C compiler.
> > > Either (purchase and) install the C compiler supplied by your OS
> > > vendor,
> > > or for a free C compiler try http://gcc.gnu.org/
> > > I cannot continue any further, aborting.
> >
> > The diagnosis is pretty clear, isn't it?
> Thanks for your reply.
> I wasn't too sure the diagnosis was very clear ...
> I have the following gcc pre-installed :
>
> -r-xr-xr-x 3 root bin 122260 Jan 23 2005 /usr/sfw/bin/gcc
>
>
> Do you know of any way I can find out whether it is corrupted or
> incomplete in any way.
For a functional test create a file xyz.c with a trivial C program
in it. Type make xyz and see if it compiles. Check that it uses
the C compiler you want it to use.
Anno
------------------------------
Date: Thu, 16 Nov 2006 10:32:26 +0100
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: problems while compiling perl on solaris 10
Message-Id: <ejhbbh$sav$1@nntp.fujitsu-siemens.com>
ashish wrote:
> Thanks for your reply.
> I wasn't too sure the diagnosis was very clear ...
> I have the following gcc pre-installed :
>=20
> -r-xr-xr-x 3 root bin 122260 Jan 23 2005 /usr/sfw/bin/gcc
>=20
>=20
> Do you know of any way I can find out whether it is corrupted or
> incomplete in any way.
It's not really a Perl-issue, but ... How did it get installed? If it=20
came with an rpm, you could ask rpm to check:
rpm -qf /usr/sfw/bin/gcc
will tell you chich packet it came with and then
rpm -V <packagename>
will check whether any files were changed, e.g.
=2E.5....T /usr/sfw/bin/gcc
would mean the md5sum and the mtime of the file differ.
Other package managers most likely provide an analogous feature.
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Thu, 16 Nov 2006 11:24:23 +0100
From: Mark Clements <mark.clementsREMOVETHIS@wanadoo.fr>
Subject: Re: problems while compiling perl on solaris 10
Message-Id: <455c3c52$0$27395$ba4acef3@news.orange.fr>
ashish wrote:
> Hi Mark,
>
> Thanks for the tip.
>
> I want to be able to compile perl as later I will need to be able to
> compile additional modules. In particular, I want to be able to compile
> the sybperl module which is for connecting to a sybase database.
OK - you probably don't need to go down this route, though. I had
assumed that sybperl, oraperl etc were obsolete, although I stand open
to correction.
New code should probably use DBI and its associated driver modules:
DBD::Sybase in your case. You don't need to recompile the whole of perl
in order to use this: you just compile the module (downloadable from
search.cpan.org) against your sybase client libraries.
perldoc -q database
> I also wanted to be able to have a separate perl for one particular
> application in the application's sub directory structure. I wanted to
> be free from the unix admins as in our case, the machine is managed by
> an offsite vendor, and they are not very responsive.
The packages supplied by sunfreeware typically install in /usr/local,
although some install in /opt (sometimes you have the choice of two
packages).
However: CPAN modules can be installed anywhere in the filesystem. All
you have to tell perl is where to find them, typically using
use lib qw(/path/to/my/libraries);
or its cousins.
perldoc -q lib
> Do you think I can install a solaris package in a directory of my
> choice?
docs for pkgadd
http://docs.sun.com/app/docs/doc/817-3937/6mjgeag0d?a=view
There is a -R, but this specifies root path rather than an installation
directory. If you used this it would mess up paths compiled into the
binary. Short answer: no, you can't.
Mark
------------------------------
Date: 16 Nov 2006 00:45:57 -0800
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Re: Tk- getOpenFile sticks on W2K server
Message-Id: <1163666757.398018.106010@f16g2000cwb.googlegroups.com>
>
> use Win32API::File ("getLogicalDrives");
> @roots= getLogicalDrives()
Thanks,
but I need a GUI window for user to browse it ...
------------------------------
Date: 16 Nov 2006 04:25:26 -0800
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Win32::GUI or Tk ?
Message-Id: <1163679925.906158.193070@k70g2000cwa.googlegroups.com>
HI,
What is more popular/preferable/recommended for GUI in Perl:
Win32::GUI or Tk ?
Thanks
------------------------------
Date: Thu, 16 Nov 2006 17:49:21 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Win32::GUI or Tk ?
Message-Id: <eji8f3.1mo.1@news.isolution.nl>
MoshiachNow schreef:
> What is more popular/preferable/recommended for GUI in Perl:
> Win32::GUI or Tk ?
Or wxPerl?
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Thu, 16 Nov 2006 18:29:31 +0000
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: Win32::GUI or Tk ?
Message-Id: <g69d57nfdo4.fsf@lifelogs.com>
On 16 Nov 2006, rvtol+news@isolution.nl wrote:
> MoshiachNow schreef:
>
>> What is more popular/preferable/recommended for GUI in Perl:
>> Win32::GUI or Tk ?
>
> Or wxPerl?
All three have benefits. Don't forget HTML GUIs too (though limited,
they can do a lot, and you don't have to write a dedicated client).
The questions are:
- what platforms will you use?
- what do you need to do?
- are you familiar with Win32 or Tk or wx?
Ted
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 9972
***************************************
