Re: Simple OO problem ... Updated

# MAIN use test::Foo; my $x = new test::Foo ( 'SunSet', 'myID', 'myPassword' ); my $y = Clone($x); my $z = $y -> Clone; $y->{TEMPLATE} = 'SunRaise'; my $t = 'TEMPLATE'; print $$x{$t} . " " . $$y{$t} . " " . $$z{$t}; # test::Foo package test::Foo; use strict; require Exporter; our @ISA = qw/

Re: Extra newline characters.

On Fri, 8 Oct 2004 15:25:36 -0700 (PDT), Ron Smith <[EMAIL PROTECTED]> wrote: > > > Thanks all. The problem was at the begining of the 'TELNET' session, I have > to type in: UNSET CRLF. > > > Do you Yahoo!? > Yahoo! Mail Address AutoComplete - You start. We fi

Extra newline characters.

Thanks all. The problem was at the begining of the 'TELNET' session, I have to type in: UNSET CRLF. - Do you Yahoo!? Yahoo! Mail Address AutoComplete - You start. We finish.

Re: global matching

Vladimir Lemberg wrote: I have this file: foobar-45whatever-37hello16goodbye9#!!! snafu23skidoo---+30-50 I need to store all digits into list. As you can see there is no any obvious delimiter, so I'm using global matching open (INFILE, "$ARGV[0]") || die "cannot open $ARGV[0].\n"; @digits

Re: global matching

> open (INFILE, "$ARGV[0]") || die "cannot open $ARGV[0].\n"; > @digits = =~ /-*?\d+/g; > print "@digits"; > > The problem is that @digits took only first line of my file. You read only 1 line... for more, you may need, my $lines = join "", ; @digits = $lines =~ /-*?\d+/g; or my @digit

RE: global matching

Vladimir Lemberg wrote: > Hi, > > Could you help me to solve this problem? > > > > I have this file: > > foobar-45whatever-37hello16goodbye9#!!! > > snafu23skidoo---+30-50 > > > > I need to store all digits into list. As you can see there is no any > obvious delimiter, so I'm usin

global matching

Hi, Could you help me to solve this problem? I have this file: foobar-45whatever-37hello16goodbye9#!!! snafu23skidoo---+30-50 I need to store all digits into list. As you can see there is no any obvious delimiter, so I'm using global matching open (INFILE, "$ARGV[0]") || d

Fwd: Extra newline characters.

-- Forwarded message -- From: Errin Larsen <[EMAIL PROTECTED]> Date: Fri, 8 Oct 2004 15:36:28 -0500 Subject: Re: Extra newline characters. To: Ron Smith <[EMAIL PROTECTED]> On Fri, 8 Oct 2004 13:24:22 -0700 (PDT), Ron Smith <[EMAIL PROTECTED]> wrote: <> > > > Thanks for your hel

Re: Global variables / special variables / variable identifier with just one character

"Adam" <[EMAIL PROTECTED]> 在郵件 news:[EMAIL PROTECTED] 中撰寫... > Expected error message: "Global symbol "$b" requires explicit package name". > However, I get result: "test". > I've checked the special variables and it looks like $b is one of these. > > use warnings; > use strict; > zzz ($b); > prin

Re: Global variables / special variables / variable identifier with just one character

> Expected error message: "Global symbol "$b" requires explicit package > name". > However, I get result: "test". > I've checked the special variables and it looks like $b is one of > these. > > use warnings; > use strict; > zzz ($b); > print "$b\n"; > sub zzz{ > $_[0] = "test"; > } > > Does it

Re: Passing shell variables to PERL

On Wed, 06 Oct 2004 16:21:31 -0700, John W. Krahn <[EMAIL PROTECTED]> wrote: > [Please do not top-post. TIA] ok > Jeff Westman wrote: > > > > On Tue, 05 Oct 2004 15:30:59 -0700, John W. Krahn wrote: > > > >>Jim wrote: > >> > >>>Willy Perez wrote: > >>> > Is there a method to pass a shell ass

Re: Simple OO problem ...

> > > > sub copy > > { my $self ; > > This is very confusing code. $self is generally used for the instance > you are acting on. 'copy' is also an odd choice, some prefer 'clone' (if > that is really what you are intending but I can't tell). Yes, I do mean Clone. > > > my $x = shift; > >

Global variables / special variables / variable identifier with just one character

Expected error message: "Global symbol "$b" requires explicit package name". However, I get result: "test". I've checked the special variables and it looks like $b is one of these. use warnings; use strict; zzz ($b); print "$b\n"; sub zzz{ $_[0] = "test"; } Does it mean - that in general - we

Re: Extra newline characters.

On Fri, 8 Oct 2004 11:51:34 -0700 (PDT), Ron Smith <[EMAIL PROTECTED]> wrote: > > > I'm not sure what you mean. I'm new at logging into shell accounts through a > 'telnet' session. I'm on a Window$ 2000 box, using 'telnet' to log into > 'sdf.lonestar.org'. The first thing that appears at login i

Re: Extra newline characters.

Whoa! Easy big fella! sdf.lonestar.org is a *FREE* public access system. No reason for secrecy or alarm. Notice the *FREE* and remember, you get what you pay for. And they do tell you about using ssh for access when you initially sign up. On Fri, 8 Oct 2004, Chris Devers wrote: > Date: Fri, 8

Re: Extra newline characters.

On Fri, 8 Oct 2004 [EMAIL PROTECTED] wrote: atleast he omited login+pwd. :) Thank Cthulu for minor disasters... -- Chris Devers -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Extra newline characters.

atleast he omited login+pwd. :) - Original Message - From: Chris Devers <[EMAIL PROTECTED]> Date: Friday, October 8, 2004 3:03 pm Subject: Re: Extra newline characters. > On Fri, 8 Oct 2004, Ron Smith wrote: > > > I'm not sure what you mean. I'm new at logging into shell > accounts > >

Re: Extra newline characters.

On Fri, 8 Oct 2004, Ron Smith wrote: I'm not sure what you mean. I'm new at logging into shell accounts through a 'telnet' session. I'm on a Window$ 2000 box, using 'telnet' to log into '[OMITTED -- chd]. The first thing that appears at login is the following: NetBSD/alpha (sdf) (ttypu) Does th

RE: Extra newline characters.

Try: $ stty sane $ TERM=vt100; export TERM That will give you a common default terminal emulation. I would recommend getting a better windows client terminal. Some good free ones are putty and teraterm. Cygwin is a complete linux emulation package the runs on windows and includes decent termin

Re: Simple OO problem ...

> > # test::load > package test::load; use strict; use warnings; > require Exporter; > our @ISA = qw/Exporter/; > our @EXPORT = qw/new copy/; > > sub copy > { my $self ; This is very confusing code. $self is generally used for the instance you are acting on. 'copy' is also an odd choice, som

Re: Extra newline characters.

I'm not sure what you mean. I'm new at logging into shell accounts through a 'telnet' session. I'm on a Window$ 2000 box, using 'telnet' to log into 'sdf.lonestar.org'. The first thing that appears at login is the following: NetBSD/alpha (sdf) (ttypu) Does that help? Ron Errin Larsen <[EM

Simple OO problem ...

# test::load package test::load; require Exporter; our @ISA = qw/Exporter/; our @EXPORT = qw/new copy/; sub copy { my $self ; my $x = shift; my $y = $x -> {B}; $y .= $y; $self -> {YY} = $y; bless $self; return $self; } sub new { my $self; $self -> {A} = shif

Re: Extra newline characters.

On Fri, 8 Oct 2004 11:11:26 -0700 (PDT), Ron Smith <[EMAIL PROTECTED]> wrote: > I'm working the exercises out of the "Learning Perl" book, but I'm doing so through > a shell account from a Window$ box into a UNIX environment. I'm experiencing an > oddity wherein I'm getting, what I think are, ext

Extra newline characters.

I'm working the exercises out of the "Learning Perl" book, but I'm doing so through a shell account from a Window$ box into a UNIX environment. I'm experiencing an oddity wherein I'm getting, what I think are, extra newlines or carriage returns in my code as I type it in the shell through a teln

Re: pass a filehandle then use it in grep{}?

William M West wrote: Gunnar Hjalmarsson wrote: Make it a habit to study the docs for the functions you are using: perldoc -f grep perldoc -f readdir oddly- the grep documentation in perldoc doesn't even mention filehandles. readdir does show proper use though- when i looked up grep in th

Re: Perl Documentor

On Friday 08 October 2004 09:24 am, Jenda Krynicky wrote: > From: Chris Puccio <[EMAIL PROTECTED]> > > > Im looking for something opensource that can read in directories of > > perl source files, and build a nice web based output on the lines of > > what's used at: > > > > http://www.oscdox.com/cro

RE: Perl Documentor

Please bottom post > Wiggins, > Is this package http://perl.overmeer.net/oodoc/ supported? I've had trouble > making it work and I sent mail to the author requesting help. > > Since I received no response from the author, do you expect we could find > support for http://perl.overmeer.net/ood

Re: Perl Documentor

> Depending on how your code is done you might consider OODoc, which won't > do the variable thing, but it seems to be very good at documenting OOP > methods, etc. > > http://perl.overmeer.net/oodoc/ > > The documentation for Mail::Box is an incredible example. A very complex > suite of modules, do

Re: Question to use SOAP::Lite

Thanks "NYIMI Jose )" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > -Original Message- > From: Angela Chan [mailto:[EMAIL PROTECTED] > Sent: Thursday, October 07, 2004 8:17 PM > To: [EMAIL PROTECTED] > Subject: Question to use SOAP::Lite > > > Hi, > > I would like to use

RE: pass a filehandle then use it in grep{}?

>Right. readdir() expects a DIRHANDLE as the argument, while grep() >expects a LIST as the second argument. > >> which is fine- my careless reading of my other code got the misuse >> of <> stuck in my head- that kept me from seeing the proper >> solution. > >Make it a habit to study the docs for

RE: Perl Documentor

Wiggins, Is this package http://perl.overmeer.net/oodoc/ supported? I've had trouble making it work and I sent mail to the author requesting help. Since I received no response from the author, do you expect we could find support for http://perl.overmeer.net/oodoc/ on this list? Siegfried > >

Re: pass a filehandle then use it in grep{}?

William M West wrote: Gunnar Hjalmarsson wrote: William M West wrote: ah!! i was so used to that /not/ being the case with a normal filehandle Don't understand. Which syntax(es) are you referring to when saying that? my @array =grep {-d "$directory\/$_"} readdir ; gives me this error:: Type of ar

Re: Perl Documentor

> Greetings, > > Im looking for something opensource that can read in directories of perl > source files, and build a nice web based output on the lines of what's used > at: > > http://www.oscdox.com/crossx/nav.html?_variables/index.html > > All I can find is single page generation, or batch g

Re: Perl Documentor

On Fri, 2004-10-08 at 07:09, Chris Puccio wrote: > Greetings, > > Im looking for something opensource that can read in directories of perl > source files, and build a nice web based output on the lines of what's used > at: [snippp] You need something like Doxygen in C++? Try to use POD

RE: pass a filehandle then use it in grep{}?

> Gunnar Hjalmarsson wrote: >>> William M West wrote: @creds = grep {/./} $fh; >>> >>> Try: >>> >>> @creds = grep {/./} <$fh>; >> >> ah!! i was so used to that /not/ being the case with a normal >> filehandle > >Don't understand. Which syntax(es) are you referring to when s

RE: Any way to handle Windows WM_QUERYENDSESSION message?

[EMAIL PROTECTED] wrote: > I have a Perl script running on Windows that functions as a wrapper > to a second program -- a compiled executable I cannot change. Within > my Perl script, I use 'system' to call the second program and wait > for it to return -- pretty basic. However, the second program

RE: Perl Documentor

From: Chris Puccio wrote: : Greetings, : : Im looking for something opensource that can read in : directories of perl source files, and build a nice web based : output on the lines of what's used at: : : http://www.oscdox.com/crossx/nav.html?_variables/index.html : :

Re: Perl Documentor

From: Chris Puccio <[EMAIL PROTECTED]> > Im looking for something opensource that can read in directories of > perl source files, and build a nice web based output on the lines of > what's used at: > > http://www.oscdox.com/crossx/nav.html?_variables/index.html > > All I can find is single page g

Re: Copy image from one web server to another

Hallo, Chris! Oh, in this library "getstore" is more matching I suppose. Thank you! Chris Devers wrote: On Fri, 8 Oct 2004, Nicolay A. Vasiliev wrote: I need to be adviced how to implement the subject. I have URL of an image and I need to copy this to another web-server. I tried to make it with I

Re: Copy image from one web server to another

On Fri, 8 Oct 2004, Nicolay A. Vasiliev wrote: I need to be adviced how to implement the subject. I have URL of an image and I need to copy this to another web-server. I tried to make it with ImageMagick, but I got an error opening the file by URL. Which way could more correct to produce such op

Perl Documentor

Greetings, Im looking for something opensource that can read in directories of perl source files, and build a nice web based output on the lines of what's used at: http://www.oscdox.com/crossx/nav.html?_variables/index.html All I can find is single page generation, or batch generation, but not

Copy image from one web server to another

Hello there! I need to be adviced how to implement the subject. I have URL of an image and I need to copy this to another web-server. I tried to make it with ImageMagick, but I got an error opening the file by URL. Which way could more correct to produce such operation? -- Nicolay Vasiliev http:

RE: Question to use SOAP::Lite

> -Original Message- > From: Angela Chan [mailto:[EMAIL PROTECTED] > Sent: Thursday, October 07, 2004 8:17 PM > To: [EMAIL PROTECTED] > Subject: Question to use SOAP::Lite > > > Hi, > > I would like to use SOAP::Lite to communicate with the web > server, but I need to send the token