NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
use Perl Log In
TeeJay (2309)
TeeJay
(email not shown publicly)
http://www.aarontrevena.co.uk/
Working in Truro
Graduate with BSc (Hons) in Computer Systems and Networks
pm : london.pm, bath.pm, devoncornwall.pm
lug : Devon & Cornwall LUG
CPAN : TEEJAY [cpan.org]
irc : TeeJay
skype : hashbangperl
livejournal : hashbangperl [livejournal.com]
flickr :hashbangperl [flickr.com]
(email not shown publicly)
http://www.aarontrevena.co.uk/
Working in Truro
Graduate with BSc (Hons) in Computer Systems and Networks
pm : london.pm, bath.pm, devoncornwall.pm
lug : Devon & Cornwall LUG
CPAN : TEEJAY [cpan.org]
irc : TeeJay
skype : hashbangperl
livejournal : hashbangperl [livejournal.com]
flickr
Monday May 19, 2003
12:24 PM
hilbert's curve in perl ?
I have been looking for an implementation of Hilberts Curve in perl, and have not found a single example - there seem to be several java applets that do it as well as versions in scheme and SML, and of course several in C.
I am interested because this morning I was reading an old DDJ article (needs registration) about using 1 dimensional b-tree searches to find 2 dimensional data e.g. finding something by its lat/long in a db .
some more pages worth looking at :
If I have the time I might some perl modules for this. (edited - it's hilbert not hilburt - also fixed apostrophe )
The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
Full
Abbreviated
Hidden
Loading... please wait.
Or is it a BUG?"
"Let's call it an accidental feature. :-)"
--Larry Wall in <6909@jpl-devvax.JPL.NASA.GOV>
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.
Fractal Images and Music With Perl (Score:1)
http://www.tpj.com/source/0303/kobes_source.tgz
-gb Epistemologist at-large
another useful page (Score:2)
@JAPH = qw(Hacker Perl Another Just);
print reverse @JAPH;