[29943] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 1186 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 11 03:09:42 2008

Date: Fri, 11 Jan 2008 00:09:05 -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           Fri, 11 Jan 2008     Volume: 11 Number: 1186

Today's topics:
    Re: Active State perl for windows not working. <invalid@invalid.net>
    Re: Active State perl for windows not working. <invalid@invalid.net>
    Re: every($key, $interval) function <tzz@lifelogs.com>
    Re: Help on Perl Scripting <jimsgibson@gmail.com>
    Re: How to send email from perl-script with different p <kkeller-usenet@wombat.san-francisco.ca.us>
    Re: How to send email from perl-script with different p <simon.greenberg@gmail.com>
    Re: How to send email from perl-script with different p <kkeller-usenet@wombat.san-francisco.ca.us>
        How to send email from perl-script with different prior <simon.greenberg@gmail.com>
    Re: How to send email from perl-script with different p <noreply@gunnar.cc>
    Re: How to send email from perl-script with different p <noreply@gunnar.cc>
        Memory leak in Perl 5.10 on Solaris 10 with %ENV <china@thewrittenword.com>
    Re: Memory leak in Perl 5.10 on Solaris 10 with %ENV <smallpond@juno.com>
    Re: Memory leak in Perl 5.10 on Solaris 10 with %ENV <nospam-abuse@ilyaz.org>
    Re: Problem installing DBD::mysql monobao@gmail.com
    Re: Segmentation Fault (core dumped) on Solaris 10 mariakvelasco@gmail.com
    Re: Segmentation Fault (core dumped) on Solaris 10 mariakvelasco@gmail.com
    Re: Sending HTML (MIME) email with Net::SMTP ? <wheeledBobNOSPAM@yahoo.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Thu, 10 Jan 2008 23:06:42 -0700
From: "Reagan Revision" <invalid@invalid.net>
Subject: Re: Active State perl for windows not working.
Message-Id: <1200030962_1385@sp12lax.superfeed.net>


"Jürgen Exner" <jurgenex@hotmail.com> wrote in message 
news:2hm8o3pb07is3abdh97guc9hn6p2icrrjg@4ax.com...
> "Reagan Revision" <invalid@invalid.net> wrote:
>>
>>"Caduceus" <kcom@fusemail.com> wrote in message
>>news:dhn7o3hannpg0ugh7okc1t5k466m4gdogb@4ax.com...
>>> When I try to type in perl -v, perl -h,perl -w, or perl -procinv.pl
>>> nothing happens.  Is there something I can do for this?  TIA Steve
>>
>>In order for the perl command to do anything in my AS installation, I have
>>to use a dos prompt in the \perl\bin directory.
>
> Well, why don't you add \perl\bin (or whatever your Perl bin directory is)
> to your search path? Normally an ActiveState installation will do that
> automatically unless you tell it otherwise.
>
> jue
Du scheinst wiederum Recht zu haben:
http://zaxfuuq.net/perl14.htm

There are so many aspects of AS that I don't understand yet.  I swear it 
used to be an issue, a big, confusing one.  I've gone from a cygwin 
installation, to 5.6 to 5.8, and apparently, the path for perl.exe is now 
passé.

The above link shows two screendumps to illustrate.  The middle image is a 
screen capture from a popular movie that I added unintentionally.  The clue 
is: what is burning?
-- 
Reagan Revision

"We are being told that a competent, trustworthy president is someone
who brandishes his religion like a neon sign, loads a gun and goes out
hunting for beautiful winged creatures, and tries to imitate a past
president who, by the way, never shot a bird or felt the need to imitate
anybody."

~~  Patti Davis Is Not Flattered by GOP Candidates' Pale Imitations of
Her Father 



----== Posted via Newsfeeds.Com - Unlimited-Unrestricted-Secure Usenet News==----
http://www.newsfeeds.com The #1 Newsgroup Service in the World! 120,000+ Newsgroups
----= East and West-Coast Server Farms - Total Privacy via Encryption =----


------------------------------

Date: Thu, 10 Jan 2008 23:28:57 -0700
From: "Reagan Revision" <invalid@invalid.net>
Subject: Re: Active State perl for windows not working.
Message-Id: <1200032296_1389@sp12lax.superfeed.net>


"John Bokma" <john@castleamber.com> wrote in message 
news:Xns9A1FE7C9E5D30castleamber@130.133.1.4...
> "Reagan Revision" <invalid@invalid.net> wrote:
>

> Uhm, so you develop software with admin rights (sounds like a bad idea).
Can you elaborate?  I use perl as a hobby and don't face issues that say, a 
sysadmin might.  It sounds like admin rights have to do with the directory 
they reside in relative to the bin.

> Also, it *should* work from any location, has been doing so for me for
> years.
Apparently it works for me too.
-- 
RR

"We are being told that a competent, trustworthy president is someone
who brandishes his religion like a neon sign, loads a gun and goes out
hunting for beautiful winged creatures, and tries to imitate a past
president who, by the way, never shot a bird or felt the need to imitate
anybody."

~~  Patti Davis Is Not Flattered by GOP Candidates' Pale Imitations of
Her Father 



----== Posted via Newsfeeds.Com - Unlimited-Unrestricted-Secure Usenet News==----
http://www.newsfeeds.com The #1 Newsgroup Service in the World! 120,000+ Newsgroups
----= East and West-Coast Server Farms - Total Privacy via Encryption =----


------------------------------

Date: Thu, 10 Jan 2008 09:46:27 -0600
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: every($key, $interval) function
Message-Id: <86ve61el9o.fsf@lifelogs.com>

On Thu, 10 Jan 2008 14:56:58 +0100 "Dr.Ruud" <rvtol+news@isolution.nl> wrote: 

R> Ted Zlatanov schreef:
>> As a challenge, can anyone think of a way to fix that without using
>> extra parameters in @id, keeping the calling semantics just as they
>> are above

R> With a change in calling semantics:

R> #!/usr/bin/perl
R> use strict;
R> use warnings;

R> sub every{ my %n if 0; !(++$n{ caller(), $_[0] } % ${$_[0]}) }

R> for my $i (1..32) {
R>     print "four:\t$i\n" if every(\4); print "four again:\t$i\n" if
R> every(\4);
R> }

That's *nice*.  I didn't know Perl would optimize \4 to be a unique
reference per execution, yet distinguish between two of them named
separately:

for my $i (1..32)
{
 # prints two distinct SCALAR refs that are the same each time
 print \4, \4,"\n"; 
}

That's wonderfully consistent.

R> Did you try 4.1 and 4.2 already? :)

That's also a neat way around it, but I may as well use extra calling
arguments if I'm going to do that.

Thanks for the great ideas.
Ted


------------------------------

Date: Thu, 10 Jan 2008 10:28:31 -0800
From: Jim Gibson <jimsgibson@gmail.com>
Subject: Re: Help on Perl Scripting
Message-Id: <100120081028312384%jimsgibson@gmail.com>

In article
<75c28a2e-7b3f-4d1b-907d-c75488098c89@d21g2000prf.googlegroups.com>,
Laarni <Laarni.Zosa@ubs.com> wrote:

> Hi,
> 
> Im trying to convert c shell script to PERL but haven't use PERL
> before can anybody help me on this? Thanks in advance.

Here is some code to get you started. It is all untested and guaranteed
to have mistakes:

> 
> 
> #! /bin/csh

#!/usr/bin/perl
use strict;
use warnings;

> 
> if ($#argv <= 2) then
>    echo "Usage : $0 <table_name> <config_file> <config_file_2>"
>    exit
> endif

if( @ARGV <= 2 ) {
  print "Usage: $0 <table_name> <config_file> <config_file_2>\n";
  exit;
}

> 
> set table = $argv[1]
> set config_file = $argv[2]
> set config_file_2 = $argv[3]

my( $table, $config_file, $config_file_2 ) = @ARGV;

> 
> source $config_file

do $config_file or die("Can't do $config_file: $!");

> 
> if ( $#argv >= 3 ) then
>         if (-f $config_file_2) then
>                 source $config_file_2
>         endif
> endif

if( $config_file_2 ) {
  if( -f $config_file_2 ) {
    do $config_file_2 or die("Can't do $config_file_2: $!");
  }
}

> 
> if !(-d $backup) then
>         echo ""
>         echo "Create backup directory..."
>         mkdir $backup
> endif

if( ! -d $backup ) {
  mkdir $backup or die("Can't create $backup directory: $!");
}

> 
> if !(-d $backup/$DB) then
>         echo ""
>         echo "Create backup directory for database..."$DB
>         mkdir $backup/$DB
> endif

(similar)

> 
> bcp $DB..$table out $backup/$DB/$table -c -U$UID -P$PSW -S$SVR

(Where do $UID, $PSW, and $SVR come from? $UID looks like user id and
Perl has built-in $< for that. If $PSW and $SVR are environment
variables, you can get them from the %ENV hash as $ENV{PSW} and
$ENV{SVR}.)

system(" bcp $DB..$table out $backup/$DB/$table -c -U$< -P$ENV{PSW}
-S$ENV{SVR");

> 
> echo "     Rename table..."
> sed -e s/table/$table/g modify_rename_table.sql | runsql

(read modify_rename_table.sql file, modify, and call system to run
runsql perhaps)


> 
> #! /bin/csh

(Are you starting over?)

[rest snipped]

Good luck!

-- 
Jim Gibson

 Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
    ** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------        
                http://www.usenet.com


------------------------------

Date: Thu, 10 Jan 2008 16:10:11 -0800
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: How to send email from perl-script with different priorities :    normal or high
Message-Id: <3ooi55xl84.ln2@goaway.wombat.san-francisco.ca.us>

On 2008-01-10, Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
>
> Funny, I thought that Keith was right in that 'mail' doesn't allow 
> message headers to be set the way you described.

Maybe the OP's does.  Mine doesn't.  That's also why I said that
/usr/bin/mail varies wildly, and Net::SMTP is a better choice.  Using
sendmail is better than using mail, but there's no guarantee that the
system has sendmail.  If the script isn't meant to be used on another
machine, fine, but it always seems to happen to me that a script I never
meant for another machine always ends up on another machine.

--keith


-- 
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information



------------------------------

Date: Thu, 10 Jan 2008 14:50:00 -0800 (PST)
From: sg <simon.greenberg@gmail.com>
Subject: Re: How to send email from perl-script with different priorities :  normal or high
Message-Id: <8b02e4b6-6364-4b55-a477-be7986052ada@m34g2000hsf.googlegroups.com>

On Jan 10, 12:54=A0pm, Gunnar Hjalmarsson <nore...@gunnar.cc> wrote:
> sg wrote:
> > I'm trying to send email from my perl-script with different
> > priorities : normal or high.
>
> <snip>
>
> > open =A0( MAIL, "|/usr/bin/mail $email") or die;
>
> Try sendmail instead of mail:
>
> open MAIL, "|/usr/sbin/sendmail -t $email" or die $!;
>
> --
> Gunnar Hjalmarsson
> Email:http://www.gunnar.cc/cgi-bin/contact.pl

Thank you all for support. Script works now. What is really important:

1. Format !!!     $html .=3D "X-Priority: 1 (Highest)"."\n\n";

2. Both, /usr/bin/mail and /usr/sbin/mail -t are correctly
interpreting "HIGH" priopity parameter.

Cheers,
--Simon


------------------------------

Date: Thu, 10 Jan 2008 12:01:14 -0800
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: How to send email from perl-script with different priorities : normal  or high
Message-Id: <b5ai55xkg2.ln2@goaway.wombat.san-francisco.ca.us>

On 2008-01-10, sg <simon.greenberg@gmail.com> wrote:
>
> I'm trying to send email from my perl-script with different
> priorities : normal or high.
> For some reasons, I'm not going to use any perl-module like
> MIME::Lite.
>
> $email = "my.email\@isp.com";
> $priority = 'high';
>
> $html  = "MIME-Version: 1.0\nContent-Type: text/html\; charset=us-ascii
> \n";
> $html .= "Subject: FYI-- $date\n";
>
> $html .= "Priority: $priority\n\n";  # ---> here I'm trying to change
> email priority
>
> $html .= "<CENTER><HR>";
> $html .= "<H1><FONT color=\"blue\">FYI -- $date</FONT></H1>\n";
> $html .= "<HR></CENTER>";
>
> open  ( MAIL, "|/usr/bin/mail $email") or die;
>   print MAIL $html;
> close ( MAIL);

Do you realize that $html is entirely in the body of your message?  You
can't set headers like this.  If you're not going to use MIME::Lite, you
might consider using a module like Net::SMTP, where you construct the
whole message, including headers.  (You also won't be dependent on the
behavior of /usr/bin/mail, which does vary across implementations.)

--keith


-- 
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information



------------------------------

Date: Thu, 10 Jan 2008 11:02:46 -0800 (PST)
From: sg <simon.greenberg@gmail.com>
Subject: How to send email from perl-script with different priorities : normal  or high
Message-Id: <b8cccf2d-ac7f-4a3c-a17c-adc82e70c394@j78g2000hsd.googlegroups.com>

Hello,

I'm trying to send email from my perl-script with different
priorities : normal or high.
For some reasons, I'm not going to use any perl-module like
MIME::Lite.

$email = "my.email\@isp.com";
$priority = 'high';

$html  = "MIME-Version: 1.0\nContent-Type: text/html\; charset=us-ascii
\n";
$html .= "Subject: FYI-- $date\n";

$html .= "Priority: $priority\n\n";  # ---> here I'm trying to change
email priority

$html .= "<CENTER><HR>";
$html .= "<H1><FONT color=\"blue\">FYI -- $date</FONT></H1>\n";
$html .= "<HR></CENTER>";

open  ( MAIL, "|/usr/bin/mail $email") or die;
  print MAIL $html;
close ( MAIL);

Thank you in advance,
--Simon


------------------------------

Date: Thu, 10 Jan 2008 21:54:07 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: How to send email from perl-script with different priorities : normal    or high
Message-Id: <5uneviF1is7fpU1@mid.individual.net>

sg wrote:
> I'm trying to send email from my perl-script with different 
> priorities : normal or high.

<snip>

> open  ( MAIL, "|/usr/bin/mail $email") or die;

Try sendmail instead of mail:

open MAIL, "|/usr/sbin/sendmail -t $email" or die $!;

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: Fri, 11 Jan 2008 00:27:50 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: How to send email from perl-script with different priorities :    normal or high
Message-Id: <5unnvqF1ij2fcU1@mid.individual.net>

sg wrote:
> On Jan 10, 12:54 pm, Gunnar Hjalmarsson <nore...@gunnar.cc> wrote:
>> sg wrote:
>>>
>>> open  ( MAIL, "|/usr/bin/mail $email") or die;
>>
>> Try sendmail instead of mail:
>>
>> open MAIL, "|/usr/sbin/sendmail -t $email" or die $!;
> 
> 2. Both, /usr/bin/mail and /usr/sbin/mail -t are correctly
> interpreting "HIGH" priopity parameter.

[guess you meant to say: /usr/sbin/sendmail]

Funny, I thought that Keith was right in that 'mail' doesn't allow 
message headers to be set the way you described.

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: Thu, 10 Jan 2008 08:58:22 -0600
From: Albert Chin <china@thewrittenword.com>
Subject: Memory leak in Perl 5.10 on Solaris 10 with %ENV
Message-Id: <06mdnS8ON-MTrxvanZ2dnUVZ_qSonZ2d@speakeasy.net>

$ cat leak.pl
sub memused { return `pmap $$|tail -1|awk '{print \$2}'` }

for (my $i=1; 1 or $i<50; $i++) {
    do {
        local %ENV = %ENV;        #  <==== this is the leak !
        $ENV{HOME} = "/tmp";
    };
    print "  --->> $i iterations --- mem used --->> ", memused()
        unless $i % 10000;
}

$ uname -a
SunOS hikaru 5.10 Generic_118833-24 sun4u sparc SUNW,Sun-Fire-V240
$ perl-5.10.0 leak.pl
  --->> 10000 iterations --- mem used --->> 59816K
  --->> 20000 iterations --- mem used --->> 108968K
  --->> 30000 iterations --- mem used --->> 162216K
  --->> 40000 iterations --- mem used --->> 215464K
  --->> 50000 iterations --- mem used --->> 264616K
  ...

However, on Solaris 9:
$ uname -a
SunOS hikaru 5.10 Generic_118833-24 sun4u sparc SUNW,Sun-Fire-V240
$ perl-5.10.0 leak.pl
  --->> 10000 iterations --- mem used --->> 4504K
  --->> 20000 iterations --- mem used --->> 4504K
  --->> 30000 iterations --- mem used --->> 4504K
  --->> 40000 iterations --- mem used --->> 4504K
  ...

Perl 5.8.6 behavior on Solaris 10 is fine:
$ perl-5.8.6 leak.pl
  --->> 10000 iterations --- mem used --->> 4072K
  --->> 20000 iterations --- mem used --->> 4072K
  --->> 30000 iterations --- mem used --->> 4072K
  --->> 40000 iterations --- mem used --->> 4072K
  ...

Recompiling Perl 5.10 without -DPERL_USE_SAFE_PUTENV solved the problem.
So, is -DPERL_USE_SAFE_PUTENV known to be unsafe on Solaris 10? Maybe
depending on the Solaris 10 patchlevel?

-- 
albert chin (china @at@ thewrittenword .dot. com)


------------------------------

Date: Thu, 10 Jan 2008 08:07:44 -0800 (PST)
From: smallpond <smallpond@juno.com>
Subject: Re: Memory leak in Perl 5.10 on Solaris 10 with %ENV
Message-Id: <4d1c20c7-d073-4d29-8545-dc4881e735fd@m34g2000hsf.googlegroups.com>

On Jan 10, 9:58 am, Albert Chin <ch...@thewrittenword.com> wrote:
> $ cat leak.pl
> sub memused { return `pmap $$|tail -1|awk '{print \$2}'` }
>
> for (my $i=1; 1 or $i<50; $i++) {
>     do {
>         local %ENV = %ENV;        #  <==== this is the leak !
>         $ENV{HOME} = "/tmp";
>     };
>     print "  --->> $i iterations --- mem used --->> ", memused()
>         unless $i % 10000;
>
> }
>
> $ uname -a
> SunOS hikaru 5.10 Generic_118833-24 sun4u sparc SUNW,Sun-Fire-V240
> $ perl-5.10.0 leak.pl
>   --->> 10000 iterations --- mem used --->> 59816K
>   --->> 20000 iterations --- mem used --->> 108968K
>   --->> 30000 iterations --- mem used --->> 162216K
>   --->> 40000 iterations --- mem used --->> 215464K
>   --->> 50000 iterations --- mem used --->> 264616K
>   ...
>
> However, on Solaris 9:
> $ uname -a
> SunOS hikaru 5.10 Generic_118833-24 sun4u sparc SUNW,Sun-Fire-V240
> $ perl-5.10.0 leak.pl
>   --->> 10000 iterations --- mem used --->> 4504K
>   --->> 20000 iterations --- mem used --->> 4504K
>   --->> 30000 iterations --- mem used --->> 4504K
>   --->> 40000 iterations --- mem used --->> 4504K
>   ...
>
> Perl 5.8.6 behavior on Solaris 10 is fine:
> $ perl-5.8.6 leak.pl
>   --->> 10000 iterations --- mem used --->> 4072K
>   --->> 20000 iterations --- mem used --->> 4072K
>   --->> 30000 iterations --- mem used --->> 4072K
>   --->> 40000 iterations --- mem used --->> 4072K
>   ...
>
> Recompiling Perl 5.10 without -DPERL_USE_SAFE_PUTENV solved the problem.
> So, is -DPERL_USE_SAFE_PUTENV known to be unsafe on Solaris 10? Maybe
> depending on the Solaris 10 patchlevel?
>
> --
> albert chin (china @at@ thewrittenword .dot. com)

Perl on Solaris 10 has a bug in the handling of ENV.  If you try to
make
the ENV larger, you will likely get an out-of-memory error. The fix is
to allocate new memory when ENV is changed - which leaks the old
memory.

http://www.nntp.perl.org/group/perl.perl5.porters/2005/10/msg105366.html

--S


------------------------------

Date: Thu, 10 Jan 2008 21:01:48 +0000 (UTC)
From:  Ilya Zakharevich <nospam-abuse@ilyaz.org>
Subject: Re: Memory leak in Perl 5.10 on Solaris 10 with %ENV
Message-Id: <fm613s$124q$1@agate.berkeley.edu>

[A complimentary Cc of this posting was sent to
smallpond 
<smallpond@juno.com>], who wrote in article <4d1c20c7-d073-4d29-8545-dc4881e735fd@m34g2000hsf.googlegroups.com>:
> Perl on Solaris 10 has a bug in the handling of ENV.  If you try to
> make
> the ENV larger, you will likely get an out-of-memory error. The fix is
> to allocate new memory when ENV is changed - which leaks the old
> memory.
> 
> http://www.nntp.perl.org/group/perl.perl5.porters/2005/10/msg105366.html

If it causes a memory leak, it is not a fix, but a bug.  The code in
question keeps a constant ENV memory footprint (it just flips to 0 and
back).  IMO, when allocating new memory, Perl should keep the log of
the size allocated.

Hope this helps,
Ilya


------------------------------

Date: Thu, 10 Jan 2008 23:55:29 -0800 (PST)
From: monobao@gmail.com
Subject: Re: Problem installing DBD::mysql
Message-Id: <7b28d174-2b1e-4635-ac0f-1314382261b5@d21g2000prg.googlegroups.com>

On Dec 21 2007, 3:21=A0pm, J=F8rn Dahl-Stamnes <newsmanDEL...@REMOVEdahl-
stamnes.net> wrote:
> Hello folks,
>
> I'm trying to install the DBD::mysql, but it failes. It have done this
> before but after my system disk crashed I had to reinstall Fedora Core 4
> (yes, I know it is a bit old).
>
> I do a 'cpan -i DBD::mysql'. It claim that my AMD 64-bit prosessor does no=
t
> support x86-64 instruction set... which I find a bit odd.
>
> What can be wrong?
>
> Checking if your kit is complete...
> Looks good
> Using DBI 1.48 (for perl 5.008006 on x86_64-linux-thread-multi) installed
> in /usr/lib64/perl5/vendor_perl/5.8.6/x86_64-linux-thread-multi/auto/DBI/
> Writing Makefile for DBD::mysql
> cp lib/DBD/mysql.pm blib/lib/DBD/mysql.pm
> cp lib/DBD/mysql/GetInfo.pm blib/lib/DBD/mysql/GetInfo.pm
> cp lib/Mysql.pm blib/lib/Mysql.pm
> cp lib/DBD/mysql/INSTALL.pod blib/lib/DBD/mysql/INSTALL.pod
> cp lib/Mysql/Statement.pm blib/lib/Mysql/Statement.pm
> cp lib/Bundle/DBD/mysql.pm blib/lib/Bundle/DBD/mysql.pm
> gcc -c
> -I/usr/lib64/perl5/vendor_perl/5.8.6/x86_64-linux-thread-multi/auto/DBI/
> -I/usr/include/mysql -g -pipe -Wp,-D_FORTIFY_SOURCE=3D2 -fexceptions -m32
> -march=3Di386 -mtune=3Dpentium4 -fasynchronous-unwind-tables -D_GNU_SOURCE=

> -D_FILE_OFFSET_BITS=3D64 -D_LARGEFILE_SOURCE -fno-strict-aliasing
> -DDBD_MYSQL_WITH_SSL -DDBD_MYSQL_INSERT_ID_IS_GOOD -g =A0-D_REENTRANT
> -D_GNU_SOURCE -DDEBUGGING -fno-strict-aliasing -pipe -I/usr/local/include
> -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=3D64 -I/usr/include/gdbm -O2 -g -p=
ipe
> -Wp,-D_FORTIFY_SOURCE=3D2 -fexceptions -m64 -mtune=3Dnocona =A0
> -DVERSION=3D\"2.9008\" -DXS_VERSION=3D\"2.9008\" -fPIC
> "-I/usr/lib64/perl5/5.8.6/x86_64-linux-thread-multi/CORE" =A0 dbdimp.c
> dbdimp.c:1: error: CPU you selected does not support x86-64 instruction se=
t
> make: *** [dbdimp.o] Error 1
> =A0 /usr/bin/make =A0-- NOT OK
> Running make test
> =A0 Can't test without successful make
> Running make install
> =A0 make had returned bad status, install seems impossible
>
> --
> J=F8rn Dahl-Stamneshttp://www.dahl-stamnes.net/dahls/

I have the same problem "dbdimp.c:1: error: CPU you selected does not
support x86-64 instruction set". and i fix on my system cause my OS
based X86_64 but install i386 mysql and perl DBD,so please try
download 64bit mysql and perl-DBD,may help.(i am from
china:monobao@gmail.com)


------------------------------

Date: Thu, 10 Jan 2008 12:31:40 -0800 (PST)
From: mariakvelasco@gmail.com
Subject: Re: Segmentation Fault (core dumped) on Solaris 10
Message-Id: <9a926e67-4072-46b6-be51-672ba6e363ce@l32g2000hse.googlegroups.com>

On Jan 8, 8:46=A0pm, Joe Smith <j...@inwap.com> wrote:
> mariakvela...@gmail.com wrote:
> > I am trying to run a perl script on a Solaris 10 machine, which is
> > suppose to display a dialog box
>
> Dialog boxes are not an integral part of perl; such things are provided
> by modules. =A0Are you using the Tk module?
>
> > I keep getting a Segmentation
> > Fault (core dumped) error. =A0I don't get this error message when I run
> > it on Windows or Linux.
>
> I've seen problems like this happen if $ENV{DISPLAY} or $ENV{WINDOWID}
> get corrupted.
>
> Do you get different results when running on a dtterm, an xterm, or
> ssh/rlogin from elsewhere?
>
> =A0 =A0 =A0 =A0 -Joe


I am using Tk modules to create my dialog boxes.

The problem is on my machine, I get the right result when running my
script; however, it's run on a different machine, the Segmentation
Fault error arises.

Is there something missing on the other solaris machine?



------------------------------

Date: Thu, 10 Jan 2008 14:49:17 -0800 (PST)
From: mariakvelasco@gmail.com
Subject: Re: Segmentation Fault (core dumped) on Solaris 10
Message-Id: <619ca6c5-92c4-40a2-a0da-cd4c71b0e2fa@h11g2000prf.googlegroups.com>

On Jan 10, 12:31=A0pm, mariakvela...@gmail.com wrote:
> On Jan 8, 8:46=A0pm, Joe Smith <j...@inwap.com> wrote:
>
>
>
>
>
> > mariakvela...@gmail.com wrote:
> > > I am trying to run a perl script on a Solaris 10 machine, which is
> > > suppose to display a dialog box
>
> > Dialog boxes are not an integral part of perl; such things are provided
> > by modules. =A0Are you using the Tk module?
>
> > > I keep getting a Segmentation
> > > Fault (core dumped) error. =A0I don't get this error message when I ru=
n
> > > it on Windows or Linux.
>
> > I've seen problems like this happen if $ENV{DISPLAY} or $ENV{WINDOWID}
> > get corrupted.
>
> > Do you get different results when running on a dtterm, an xterm, or
> > ssh/rlogin from elsewhere?
>
> > =A0 =A0 =A0 =A0 -Joe
>
> I am using Tk modules to create my dialog boxes.
>
> The problem is on my machine, I get the right result when running my
> script; however, it's run on a different machine, the Segmentation
> Fault error arises.
>
> Is there something missing on the other solaris machine?- Hide quoted text=
 -
>
> - Show quoted text -

I am getting the following information when I tried to debug it using
gdb

Program received signal SIGSEGV, Segmentation fault.
0xfee32d98 in Tcl_utfToExternalDString

Hope that gives more information.


------------------------------

Date: Thu, 10 Jan 2008 22:25:14 GMT
From: still just me <wheeledBobNOSPAM@yahoo.com>
Subject: Re: Sending HTML (MIME) email with Net::SMTP ?
Message-Id: <gp6do3tfn0rfgun4liaqqm7p5uvjore4e6@4ax.com>

On 10 Jan 2008 13:52:59 GMT, John Bokma <john@castleamber.com> wrote:

>Check out MIME::Lite

Thanks John. Found some examples. I will start a new thread for any
questions on that subject. 




------------------------------

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 V11 Issue 1186
***************************************


home help back first fref pref prev next nref lref last post