Using java in perl

2006-09-24 Thread edjacob
Hi, I'm a newbie to both Perl and this list, so I hope this question and the way I've asked it are okay. I am trying to get my Perl script to produce the following Java. I http://images.google.com/images?q=/query/')">/query/ It's not working and I'm guessing that it might be because the que

Re: perl scalar

2006-09-24 Thread D. Bolliger
Owen Cook am Montag, 25. September 2006 00:36: > On Sun, 24 Sep 2006, elite elite wrote: > > How do i Assign'Wright" to the scalar how do i do > > that?And how do i change a value of $street to > > 'Washington' Hello Craig Sounds like a homwork... ;-) Type in the cmdline: perldoc perlintro the

Re: perl scalar

2006-09-24 Thread Owen Cook
On Sun, 24 Sep 2006, elite elite wrote: > > How do i Assign'Wright" to the scalar how do i do > that?And how do i change a value of $street to > 'Washington' $what_ever = "Wright"; $what_ever = "I have changed it from Wright to this"; $street = 'Washington'; > > How do i print $street on it

Re: writing a package

2006-09-24 Thread D. Bolliger
D. Bolliger am Sonntag, 24. September 2006 17:46: [...] >... error: Undefined subroutine &main::cmp_file called > at ./script.pl line 30. [...] Argh! Please disregard my previous post - sorry to all. I did not realize that cmp_file() is part of the module to test (File::Cmp) a

perl scalar

2006-09-24 Thread elite elite
How do i Assign'Wright" to the scalar how do i do that?And how do i change a value of $street to 'Washington' How do i print $street on it own line just like hello world? Craig __ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam prot

Re: writing a package

2006-09-24 Thread Rob Dixon
Dani Bolliger wrote: > > Johnson, Reginald (GTI) am Sunday, 24. September 2006 04:47: >> >> Tom Phoenix wrote: >>> >>> On 9/23/06, Johnson, Reginald (GTI) <[EMAIL PROTECTED]> wrote: t/1Test header seen more than once! use Test::More tests => 1; BEGIN { $| = 1; print "1

Re: about perltoot

2006-09-24 Thread chen li
> > Hello Li > > About the _permitted hash key, the perltoot tutorial > says > > + I could have avoided the "_permitted" field > entirely, but I wanted to > + demonstrate how to store a reference to class data > on the object so you > + wouldn't have to access that class data directly > from an

Re: about perltoot

2006-09-24 Thread chen li
> Why didn't you test what happens when you do that? > What happens when you > create three different objects and manipulate them? > What happens with > those object when you go back to the original code? Actually before I post it I already check what happen. It looks like there are NO differe

Re: about perltoot

2006-09-24 Thread Mumia W.
On 09/24/2006 12:35 PM, chen li wrote: --- "Mumia W." <[EMAIL PROTECTED]> wrote: On 09/22/2006 07:50 AM, chen li wrote: --- "Mumia W." <[EMAIL PROTECTED]> wrote: That "redundancy" allows you to use inheritance. If you have a class Employee, with an expanded set of fields, this method ma

Re: about perltoot

2006-09-24 Thread Rob Dixon
chen li wrote: > > --- "Mumia W." <[EMAIL PROTECTED]> > wrote: > > >>On 09/22/2006 07:50 AM, chen li wrote: >> >>>--- "Mumia W." >> >><[EMAIL PROTECTED]> >> >>>wrote: >>> That "redundancy" allows you to use inheritance. >> >>If >> you have a class Employee, with an expanded set of fiel

Re: about perltoot

2006-09-24 Thread chen li
--- "Mumia W." <[EMAIL PROTECTED]> wrote: > On 09/22/2006 07:50 AM, chen li wrote: > > > > --- "Mumia W." > <[EMAIL PROTECTED]> > > wrote: > >> That "redundancy" allows you to use inheritance. > If > >> you have a class > >> Employee, with an expanded set of fields, this > >> method makes it p

Re: writing a package

2006-09-24 Thread D. Bolliger
Johnson, Reginald (GTI) am Sunday, 24. September 2006 04:47: > I made the changes that you advised > use Test::More tests => 3; > #BEGIN { $| = 1; print "1..3\n";} > > My error has changed slightly > >PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" > "test_harness(0, 'blib/li

Re: selecting a part of a string

2006-09-24 Thread Rob Dixon
John W. Krahn wrote: > Rob Dixon wrote: > >>Adriano Allora wrote: >> >>>$tex =~ s/^([^|]+).*/$1/o; >> >>Your regex is correct, but it doesn't do what you said you wanted! You're >>substituting the entire string in $tex for just those characters up to >>the first >>pipe, but there's nothing