[29248] in Perl-Users-Digest
Perl-Users Digest, Issue: 492 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 7 16:10:35 2007
Date: Thu, 7 Jun 2007 13:09:14 -0700 (PDT)
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, 7 Jun 2007 Volume: 11 Number: 492
Today's topics:
*L00K* what these girls get down their throat! complex.easy.n4@gmail.com
How to generate a process chart from Perl code ? <ynl@nsparks.net>
Re: How to generate a process chart from Perl code ? <ynl@nsparks.net>
Re: Querying for a registry string VALUE AutoEndTasks <glex_no-spam@qwest-spam-no.invalid>
Selecting special characters in a string (Regex?) <disco@anywherebuthere.com>
Re: Selecting special characters in a string (Regex?) <noreply@gunnar.cc>
Re: Sorting keith@bytebrothers.co.uk
Re: Sorting <noreply@gunnar.cc>
Re: Sorting <mritty@gmail.com>
Re: System call doesn't work xlue897@rogers.com
Re: System call doesn't work xlue897@rogers.com
Re: System call doesn't work <glex_no-spam@qwest-spam-no.invalid>
Re: Yet Another Software Challenge <rjh@see.sig.invalid>
Re: Yet Another Software Challenge <jurgenex@hotmail.com>
Re: Yet Another Software Challenge yanosc@gmail.com
Re: Yet Another Software Challenge yanosc@gmail.com
Re: Yet Another Software Challenge dilbert1999@gmail.com
Re: Yet Another Software Challenge <JSmith@mail.net>
Re: Yet Another Software Challenge <albalmer@att.net>
Re: Yet Another Software Challenge <albalmer@att.net>
Re: Yet Another Software Challenge <albalmer@att.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 07 Jun 2007 12:43:38 -0700
From: complex.easy.n4@gmail.com
Subject: *L00K* what these girls get down their throat!
Message-Id: <1181245418.487026.223040@o5g2000hsb.googlegroups.com>
http://goofythroat.info - amazing what goes down these girls throats
no gag reflex!
------------------------------
Date: Thu, 7 Jun 2007 18:16:36 +0200
From: Yohan N Leder <ynl@nsparks.net>
Subject: How to generate a process chart from Perl code ?
Message-Id: <MPG.20d24db57acebf6e98992f@news.tiscali.fr>
Hi all,
I have to understand a long Perl CGI script which has not been written
by me nor someone still in the company. So, even if it's commented, I'm
wondering if it could exists a pice of software able to analyze Perl
code and produce a kind of process chart (not necessarily very deeply in
detail but at least about mains architecture)
------------------------------
Date: Thu, 7 Jun 2007 18:36:30 +0200
From: Yohan N Leder <ynl@nsparks.net>
Subject: Re: How to generate a process chart from Perl code ?
Message-Id: <MPG.20d252771e1d0027989930@news.tiscali.fr>
In article <MPG.20d24db57acebf6e98992f@news.tiscali.fr>, ynl@nsparks.net
says...
> Hi all,
>
> I have to understand a long Perl CGI script which has not been written
> by me nor someone still in the company. So, even if it's commented, I'm
> wondering if it could exists a pice of software able to analyze Perl
> code and produce a kind of process chart (not necessarily very deeply in
> detail but at least about mains architecture)
>
Found "Code to Flow Chart Generator". I'll take a try.
------------------------------
Date: Thu, 07 Jun 2007 10:21:00 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: Querying for a registry string VALUE AutoEndTasks
Message-Id: <4668225c$0$10296$815e3792@news.qwest.net>
possible issueSimonH wrote:
> Hi guys would love your help.
>
> I have the following....
>
> =================================================================
> #use Win32::Process;
use strict;
use warnings;
> use Win32::Registry;
> open (INPUT,"machines.txt") or die "cant open machine.txt";
> @computers = <INPUT>;
This reads the entire file into @computers.
>
> while (<INPUT>){
There's nothing left to read, so this is useless.
> chomp;
> push @computers, $_;
> }
> foreach $computer(@computers) {
Replace the foreach with the while above, without the push. No
need to read the entire file into @computers.
while( chomp( my $computer = <INPUT> ) )
> print "Connecting to ....... $computer\n";
> $rc = system ("net use \\\\$computer\\ipc\$ /user:domain\\user
> password> NUL");
> if ($rc ==0){ # If the connection succeeds
> print "Connected to $computer\n";
> QueryAutoEndTasksReg;
> print " AutoEndTasks = $AutoValue\n";
> }
> elsif (!rc ==0) {
Missing a '$' there... actually, no condition is needed. Either it's 0,
as above, or it isn't, so simply an else will suffice.
# If
> the connection fails......
> print "Failed to connect to $computer\n\n";
> }
> }
>
> sub QueryAutoEndTasksReg {
> $p = '.DEFAULT\Control Panel\Desktop';
> Win32::RegOpenKeyEx(&HKEY_USERS,$p,&NULL,&KEY_ALL_ACCESS,$hkey);
> Win32::RegQueryValueEx($hkey,"AutoEndTasks",&NULL,$type,$AutoValue);
> # Win32::RegCloseKey($hkey);
>
> }
No idea what's really wrong, just pointing out obvious things.
------------------------------
Date: Thu, 07 Jun 2007 17:31:31 GMT
From: disco <disco@anywherebuthere.com>
Subject: Selecting special characters in a string (Regex?)
Message-Id: <ThX9i.22909$xU4.12318@newsfe1-gui.ntli.net>
I'm looking to select all the characters in a string which can't be
typed by a standard English keyboard (I.e You have to use alt+code or
the character map etc.). A regular expression would be a useful way of
doing this, as I want to count the number of occurrences and also
replace them with other characters.
Any help or tips would be much appreciated,
Thanks, disco.
------------------------------
Date: Thu, 07 Jun 2007 19:41:44 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Selecting special characters in a string (Regex?)
Message-Id: <5cqufrF31s8e4U1@mid.individual.net>
disco wrote:
> I'm looking to select all the characters in a string which can't be
> typed by a standard English keyboard (I.e You have to use alt+code or
> the character map etc.). A regular expression would be a useful way of
> doing this, as I want to count the number of occurrences and also
> replace them with other characters.
Better up would be to use the tr() operator.
perldoc perlop
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Thu, 07 Jun 2007 08:27:02 -0700
From: keith@bytebrothers.co.uk
Subject: Re: Sorting
Message-Id: <1181230022.554606.216900@q66g2000hsg.googlegroups.com>
On 7 Jun, 09:44, k...@bytebrothers.co.uk wrote:
> File::Sort which will allow me to specify that there is one or more
> header records at the start of the input which should be untouched by
> the sort.
OK, no responses, so I had time to find more research material, which
led me to this solution. Any advice on ways to tighten this up a tad
without losing too much readability?
The data look like this (delimiters line up vertically):
==================================
Licence | Created| Crtd By | Products | Qty | To Loc | Last |
DZone
01799|05/06/07| OOS1| NIV0327R| 960| YH3621| |
BACK
1|07/06/07| SPODE| STT0014V| 156| SFF15| |
S
10106|06/06/07| DALEC| VAN1383T| 0| JLE12| |
GDSIN1
1015|29/05/07| OOSOFFC| CIF0012T| 192| XP4417| |
BACK
1022|31/05/07| WOODC| DET0065Y| 141| XE4313| |
BACK
10222|04/06/07| COLEROB| FLU0473P| 1640| UAB12| SMITHN|
None
10319|07/06/07| HALLPHIL| SCH3318Q| 240| MDL22| |
GDSIN1
10350|07/06/07| QUINNJ| DOS0030K| 4072| CRH52| |
GDSIN1
==================================
So, to preserve the header and sort by the 'Products' column:
==================================
#!/usr/local/bin/perl -w
@lines = ();
@key = ();
while (<>)
{
$row++;
if ($row == 1)
{
print;
next;
}
chomp;
push @lines,$_;
push @key, (split(/\|/))[3];
}
@indices = sort {$key[$a] cmp $key[$b]} 0..$#lines;
foreach $index (@indices)
{
print "$lines[$index]\n";
}
==================================
------------------------------
Date: Thu, 07 Jun 2007 17:30:14 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Sorting
Message-Id: <5cqmpeF30unqpU1@mid.individual.net>
keith@bytebrothers.co.uk wrote:
> I would like to know if there is something like File::Sort which will
> allow me to specify that there is one or more header records at the
> start of the input which should be untouched by the sort.
my ( @headers, @records );
while ( <DATA> ) {
push @headers, $_;
push @records, <DATA> if /^===/;
}
print @headers, sort @records;
__DATA__
First header
Another header
============================
Record B
Record C
Record A
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Thu, 07 Jun 2007 08:46:39 -0700
From: Paul Lalli <mritty@gmail.com>
Subject: Re: Sorting
Message-Id: <1181231199.839741.38590@p77g2000hsh.googlegroups.com>
On Jun 7, 11:27 am, k...@bytebrothers.co.uk wrote:
> On 7 Jun, 09:44, k...@bytebrothers.co.uk wrote:
>
> > File::Sort which will allow me to specify that there is one or more
> > header records at the start of the input which should be untouched by
> > the sort.
>
> OK, no responses, so I had time to find more research material, which
> led me to this solution. Any advice on ways to tighten this up a tad
> without losing too much readability?
>
> The data look like this (delimiters line up vertically):
> ==================================
> Licence | Created| Crtd By | Products | Qty | To Loc | Last |
> DZone
> 01799|05/06/07| OOS1| NIV0327R| 960| YH3621| |
> BACK
> 1|07/06/07| SPODE| STT0014V| 156| SFF15| |
> S
> 10106|06/06/07| DALEC| VAN1383T| 0| JLE12| |
> GDSIN1
> 1015|29/05/07| OOSOFFC| CIF0012T| 192| XP4417| |
> BACK
> 1022|31/05/07| WOODC| DET0065Y| 141| XE4313| |
> BACK
> 10222|04/06/07| COLEROB| FLU0473P| 1640| UAB12| SMITHN|
> None
> 10319|07/06/07| HALLPHIL| SCH3318Q| 240| MDL22| |
> GDSIN1
> 10350|07/06/07| QUINNJ| DOS0030K| 4072| CRH52| |
> GDSIN1
> ==================================
>
> So, to preserve the header and sort by the 'Products' column:
>
> ==================================
> #!/usr/local/bin/perl -w
use strict;
> @lines = ();
> @key = ();
no need to intialize an array to the empty list. That's what it is
already.
> while (<>)
> {
> $row++;
This variable already exists for you. It's name is '$.'. No need to
keep track the line count separately.
> if ($row == 1)
> {
> print;
> next;
> }
> chomp;
> push @lines,$_;
> push @key, (split(/\|/))[3];
>
> }
>
> @indices = sort {$key[$a] cmp $key[$b]} 0..$#lines;
> foreach $index (@indices)
> {
> print "$lines[$index]\n";}
rather than messing with a bunch of indices, I would prefer a
Schwartzian transform. The syntax has a bit of a learning curve, but
once you "get it", it becomes intuitive.
So my rewrite of your script comes down to:
#!/opt2/perl/bin/perl
use strict;
use warnings;
my @lines;
while (<DATA>) {
print and next if $. == 1;
push @lines, $_;
}
print map { $_->[0] }
sort { $a->[1] cmp $b->[1] }
map { [ $_, (split /\|/)[3] ] }
@lines;
__DATA__
Licence | Created| Crtd By | Products | Qty | To Loc | Last | DZone
01799|05/06/07| OOS1| NIV0327R| 960| YH3621| | BACK
1|07/06/07| SPODE| STT0014V| 156| SFF15| | S
10106|06/06/07| DALEC| VAN1383T| 0| JLE12| |
GDSIN1
1015|29/05/07| OOSOFFC| CIF0012T| 192| XP4417| | BACK
1022|31/05/07| WOODC| DET0065Y| 141| XE4313| | BACK
10222|04/06/07| COLEROB| FLU0473P| 1640| UAB12| SMITHN| None
10319|07/06/07| HALLPHIL| SCH3318Q| 240| MDL22| |
GDSIN1
10350|07/06/07| QUINNJ| DOS0030K| 4072| CRH52| |
GDSIN1
Paul Lalli
------------------------------
Date: Thu, 07 Jun 2007 09:00:47 -0700
From: xlue897@rogers.com
Subject: Re: System call doesn't work
Message-Id: <1181232047.913742.315880@g37g2000prf.googlegroups.com>
On Jun 6, 6:29 pm, Joe Smith <j...@inwap.com> wrote:
> xlue...@rogers.com wrote:
> > Hi, All:
>
> > I have the following perl code intending to open several files using
> > vi. But it doesn't work.
>
> > ls test* | perl -n -e 'chomp; $cmd="vi $_"; unless(system($cmd))
> > { print "success\n";}'
>
> You're calling 'vi' with STDIN still connected to the pipe from 'ls'.
>
> perl -le 'print system("vi $_") ? "error ".$?>>8 : "OK" for @ARGV' *.pl
>
> -Joe
Thanks you Joe. It works. However, how can I change the STDIN from
pipe to standard input and vice versa?
Thanks,
Steven
------------------------------
Date: Thu, 07 Jun 2007 09:10:27 -0700
From: xlue897@rogers.com
Subject: Re: System call doesn't work
Message-Id: <1181232627.699457.46500@n15g2000prd.googlegroups.com>
On Jun 7, 12:00 pm, xlue...@rogers.com wrote:
> On Jun 6, 6:29 pm, Joe Smith <j...@inwap.com> wrote:
>
> > xlue...@rogers.com wrote:
> > > Hi, All:
>
> > > I have the following perl code intending to open several files using
> > > vi. But it doesn't work.
>
> > > ls test* | perl -n -e 'chomp; $cmd="vi $_"; unless(system($cmd))
> > > { print "success\n";}'
>
> > You're calling 'vi' with STDIN still connected to the pipe from 'ls'.
>
> > perl -le 'print system("vi $_") ? "error ".$?>>8 : "OK" for @ARGV' *.pl
>
> > -Joe
>
> Thanks you Joe. It works. However, how can I change the STDIN from
> pipe to standard input and vice versa?
>
> Thanks,
>
> Steven
Hi,
I worked out the function by unix find command:
find . -name 'test*' -exec vi {} \;
however, still cannot figure out how perl implement the same function.
Any help will be appreciated.
Thanks,
Steven
------------------------------
Date: Thu, 07 Jun 2007 13:30:08 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: System call doesn't work
Message-Id: <46684eb0$0$505$815e3792@news.qwest.net>
xlue897@rogers.com wrote:
> I worked out the function by unix find command:
> find . -name 'test*' -exec vi {} \;
>
> however, still cannot figure out how perl implement the same function.
find2perl should help.
------------------------------
Date: Thu, 07 Jun 2007 15:11:54 +0000
From: Richard Heathfield <rjh@see.sig.invalid>
Subject: Re: Yet Another Software Challenge
Message-Id: <P-ednQYNPNImgvXbnZ2dnUVZ8v6dnZ2d@bt.com>
John Smith said:
> Richard Heathfield wrote:
>> yanosc@gmail.com said:
>>
>>
>>>If you're mad about software riddles
>>
>>
>> Anyone who puts almost 1700 characters on a single line has a lot to
>> learn about writing good software.
>>
>> For the benefit of the paranoid (or those with weird newsreaders), I
>> have replaced all < and > with [ and ], but otherwise what follows is
>> a verbatim quote of a single line from that page. And well, I mean
>> look at it... I mean... REALLY! Sheesh, etc.
>>
>
> What is the positive value of remarks like these? The OP is
> well-intentioned and the site is functional.
It is? How strange. It crashed my browser, so I couldn't tell.
> Why not just let trivial issues pass?
You mean, follow your lead?
> It's getting to the point where a RH post is
> more likely to contain niggling criticism and sarcasm than
> helpful information.
You know where your killfile is, I presume.
--
Richard Heathfield
"Usenet is a strange place" - dmr 29/7/1999
http://www.cpax.org.uk
email: rjh at the above domain, - www.
------------------------------
Date: Thu, 07 Jun 2007 15:37:30 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Yet Another Software Challenge
Message-Id: <_CV9i.7343$My4.4761@trndny05>
yanosc@gmail.com wrote:
> If you're mad about software riddles, just have a look at
> http://software.challenge.googlepages.com and challenge yourself or
> invite your friends to join.
I suppose the first riddle is to find out how to use that web page. In
short: poor design because it gives no indication to the user what to do
next or in this case where to start.
And what does it have to do with Perl?
> Be prepared to spend some nights there!
Nope, sorry. I don't play guessing games with random clicks somewhere on
some web page.
jue
------------------------------
Date: Thu, 07 Jun 2007 08:59:53 -0700
From: yanosc@gmail.com
Subject: Re: Yet Another Software Challenge
Message-Id: <1181231993.643619.64670@p47g2000hsd.googlegroups.com>
Dear Mr. Heathfield,
Your arguments are really amazing. You're stating that you're not
responsible for the HTML of your site. Exactly like me because mine is
generated by Google. Anywway, the polemic you have created yourself
has ABSOLUTELY no interest. Nobody care to know if HTML code has to
have less of 120 characters/line or not, especially when generated by
third party robots. The more you post the more you dig your own hole.
The site purpose is to let people learn programming and a lot of other
things through problem-solving with fun. If you don't like it, just
don't use it. If the site crashes your browser, post me privately an
email so that I investigate together with Google.
Moreover you've reproduced there, without my authorization, a part of
my site with is COPYRIGHTED and thus you've infringed my rights while
these copyrights are clearly expressed on the homepage and in the
Terms of Use. So before violating publicly copyrights, read carefully
the Terms of Use!
Thierry
On Jun 7, 3:16 pm, Richard Heathfield <r...@see.sig.invalid> wrote:
> yan...@gmail.com said:
>
> > On Jun 7, 2:58 pm, Richard Heathfield <r...@see.sig.invalid> wrote:
> >> yan...@gmail.com said:
>
> <snip>
>
> >> > Medice, cure te ipsum
>
> >> If you have an example of poor HTML for which I'm responsible on a
> >> site to which I have write access, by all means let me know and I'll
> >> do my very best to fix it. You see, I too am always willing to learn.
>
> > So, start by fix this one:
>
> http://www.samspublishing.com/authors/bio.asp?a=6af3c790-dae2-48c1-a4...
>
> Whilst I did indeed write the text that is shown at that site, to place
> the text there was not my choice, the HTML there is the responsibility
> of SAMS (because they composed that page), and I don't have write
> access to that site. It is therefore impossible for me to fix or remove
> it. If you have an example of poor HTML for which I'm responsible on a
> site to which I have write access, by all means let me know and I'll do
> my very best to fix it.
>
> In future, before you respond to an article, please read it properly.
> Thank you.
>
> --
> Richard Heathfield
> "Usenet is a strange place" - dmr 29/7/1999http://www.cpax.org.uk
> email: rjh at the above domain, - www.
------------------------------
Date: Thu, 07 Jun 2007 09:23:02 -0700
From: yanosc@gmail.com
Subject: Re: Yet Another Software Challenge
Message-Id: <1181233382.308543.78250@k79g2000hse.googlegroups.com>
On Jun 7, 5:37 pm, "J=FCrgen Exner" <jurge...@hotmail.com> wrote:
> yan...@gmail.com wrote:
> > If you're mad about software riddles, just have a look at
> >http://software.challenge.googlepages.comand challenge yourself or
> > invite your friends to join.
>
> I suppose the first riddle is to find out how to use that web page. In
> short: poor design because it gives no indication to the user what to do
> next or in this case where to start.
You're absolutely wrong! Where to start is clearly shown. Thousands of
people have succeed so far..
>
> And what does it have to do with Perl?
You've to try to know!
>
> > Be prepared to spend some nights there!
>
> Nope, sorry. I don't play guessing games with random clicks somewhere on
> some web page.
You're free. There is no random clicks. This is a software challenge.
>
> jue
------------------------------
Date: Thu, 07 Jun 2007 09:39:17 -0700
From: dilbert1999@gmail.com
Subject: Re: Yet Another Software Challenge
Message-Id: <1181234357.484454.87660@q69g2000hsb.googlegroups.com>
On Jun 7, 1:10 pm, Richard Heathfield <r...@see.sig.invalid> wrote:
> yan...@gmail.com said:
> > If you're mad about software riddles
>
> Anyone who puts almost 1700 characters on a single line has a lot to
> learn about writing good software.
Well, I counted not 1700, but around 117000 chars on that single line.
I consider this software riddle a great exercise for anybody who
thinks about starting a career in the software industry.
I already work in the software industry and my PHB usually uses the
following technique halfway between any two performance reviews:
* He asks me to create for him a small "Report" (in M$ Excel, of
course) with the latest sales figures, no more than a fifty lines or
so.
* He then takes that document with him, adding a couple of lines, not
many, the document would still be less than a houndred lines.
* Then, to sum up the document, he starts adding Excel formulas,
ridiculously complicated and nested, for example to find the text
between the 4th and the 5th "&"-character in a single cell "C60", he
would add:
=MID(C60, FIND("&",C60, FIND("&",C60, FIND("&",C60,
FIND("&",C60,1)+1)+1)+1), FIND("&",C60, FIND("&",C60, FIND("&",C60,
FIND("&",C60, FIND("&",C60,1)+1)+1)+1)+1) - FIND("&",C60,
FIND("&",C60, FIND("&",C60, FIND("&",C60,1)+1)+1)+1)+1)
* finally, to render the document unusable, he adds a couple of
=VLOOKUP() formulas with references to some external documents which
are held on an external server with a slow bitrate connection. So
whenever you move your mouse-pointer in explorere.exe anywhere near
the *.xls document (...and you don't have to open excel to feel the
experience...), your whole PC freezes up and you have to wait 20
minutes for the time-out or do the "Ctrl-Alt-Del".
* He saves the document on a floppy disk, gives me that floppy disks
and asks me to calculate the total sales figure. Of course, he does
not hesitate to point out that it's only a houndred lines, so this
should not be difficult.
Ok, I fall in that "Ctrl-Alt-Del" trap each and every time, I then
reboot my PC, disable my network connection and rename the *.xls into
*.txt format. I then, of course, have a text file the size of about of
100K, most of which are control characters, basically all in one
single line.
I used to open it up in wordpad.exe and use Ctrl-F to more or less
guess where the sales figures are, but I have got myself into PERL
recently and things are looking much better now.
------------------------------
Date: Thu, 07 Jun 2007 17:03:36 GMT
From: John Smith <JSmith@mail.net>
Subject: Re: Yet Another Software Challenge
Message-Id: <ITW9i.4036$NV3.3719@pd7urf2no>
Richard Heathfield wrote:
> John Smith said:
>
>
>>Richard Heathfield wrote:
>>
>>> yanosc@gmail.com said:
>>>
>>>
>>>
>>>>If you're mad about software riddles
>>>
>>>
>>>Anyone who puts almost 1700 characters on a single line has a lot to
>>>learn about writing good software.
>>>
>>>For the benefit of the paranoid (or those with weird newsreaders), I
>>>have replaced all < and > with [ and ], but otherwise what follows is
>>>a verbatim quote of a single line from that page. And well, I mean
>>>look at it... I mean... REALLY! Sheesh, etc.
>>>
>>
>>What is the positive value of remarks like these? The OP is
>>well-intentioned and the site is functional.
>
>
> It is? How strange. It crashed my browser, so I couldn't tell.
It works fine with mine. Try Mozilla Firefox.
>
>
>>Why not just let trivial issues pass?
>
>
> You mean, follow your lead?
>
>
>>It's getting to the point where a RH post is
>>more likely to contain niggling criticism and sarcasm than
>>helpful information.
>
>
> You know where your killfile is, I presume.
No intention of doing that. You're a valuable asset to this forum
when you can manage to refrain from petty bickering. You may have
the last word and that's the end of it.
JS
------------------------------
Date: Thu, 07 Jun 2007 18:50:22 GMT
From: Al Balmer <albalmer@att.net>
Subject: Re: Yet Another Software Challenge
Message-Id: <2lkg631eacnae6bdd67c46gk4245l36cqm@4ax.com>
On Thu, 07 Jun 2007 08:59:53 -0700, yanosc@gmail.com wrote:
>Dear Mr. Heathfield,
>
>Your arguments are really amazing. You're stating that you're not
>responsible for the HTML of your site.
? I thought he was saying that it's not his site. The site belongs to
Sam's Publishing, a well known book publisher. You might have guessed
that from the URL, but here's a blurb:
http://www.samspublishing.com/about/index.asp?rl=1
--
Al Balmer
Sun City, AZ
------------------------------
Date: Thu, 07 Jun 2007 18:58:56 GMT
From: Al Balmer <albalmer@att.net>
Subject: Re: Yet Another Software Challenge
Message-Id: <0vkg63poevu410t3lkf7efnnqj4qn177od@4ax.com>
On Thu, 07 Jun 2007 08:59:53 -0700, yanosc@gmail.com wrote:
>Moreover you've reproduced there, without my authorization, a part of
>my site with is COPYRIGHTED and thus you've infringed my rights while
>these copyrights are clearly expressed on the homepage and in the
>Terms of Use. So before violating publicly copyrights, read carefully
>the Terms of Use!
You need to do a bit of research on copyrights. Especially, note the
provisions for fair use, which Richard's posting is an excellent
example of.
Just look at all the opportunities you have to learn more!
--
Al Balmer
Sun City, AZ
------------------------------
Date: Thu, 07 Jun 2007 19:10:34 GMT
From: Al Balmer <albalmer@att.net>
Subject: Re: Yet Another Software Challenge
Message-Id: <7ulg63pm4dqeoupnbusvg921fp5v8p2isc@4ax.com>
On Thu, 07 Jun 2007 09:23:02 -0700, yanosc@gmail.com wrote:
>On Jun 7, 5:37 pm, "Jürgen Exner" <jurge...@hotmail.com> wrote:
>> yan...@gmail.com wrote:
>> > If you're mad about software riddles, just have a look at
>> >http://software.challenge.googlepages.comand challenge yourself or
>> > invite your friends to join.
>>
>> I suppose the first riddle is to find out how to use that web page. In
>> short: poor design because it gives no indication to the user what to do
>> next or in this case where to start.
>
>You're absolutely wrong! Where to start is clearly shown. Thousands of
>people have succeed so far..
I couldn't find it, either. I suspect that you're using some html
which is not interpreted by Firefox.
--
Al Balmer
Sun City, AZ
------------------------------
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 492
**************************************
