[30243] in Perl-Users-Digest
Perl-Users Digest, Issue: 1486 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Apr 26 03:09:38 2008
Date: Sat, 26 Apr 2008 00:09:06 -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 Sat, 26 Apr 2008 Volume: 11 Number: 1486
Today's topics:
ANN: Dao 1.0 preview version is released <phoolimin@gmail.com>
Re: FAQ 1.12 What's the difference between "perl" and " <get@bentsys.com>
Re: FAQ 1.12 What's the difference between "perl" and " <uri@stemsystems.com>
Re: FAQ 1.12 What's the difference between "perl" and " <get@bentsys.com>
Re: FAQ 2.9 What are the Perl newsgroups on Usenet? Wh dummy@phony.info
new CPAN modules on Sat Apr 26 2008 (Randal Schwartz)
Re: pop langs website ranking <usenet@janc.be>
Re: printing a file to a print server prettily <cartercc@gmail.com>
Re: printing a file to a print server prettily <1usa@llenroc.ude.invalid>
Re: script to find the files with very long names <morton@lsupcaemnt.com>
Re: The map function <get@bentsys.com>
Re: WWW::Mechanize doesn't always follow_link(text <szrRE@szromanMO.comVE>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 25 Apr 2008 15:09:36 -0700 (PDT)
From: Limin Fu <phoolimin@gmail.com>
Subject: ANN: Dao 1.0 preview version is released
Message-Id: <67ae05be-a3f1-42ee-942e-5a248ad445de@m36g2000hse.googlegroups.com>
Hi,
I am please to announce a preview release of Dao (1.0). Dao is a
simple yet powerful object-oriented programming language featured by,
optional typing, BNF-like macro system, regular expression,
multidimensional numeric array, asynchronous function call for
concurrent programming etc.
Since the last beta release (2006 november), a number of new features
have been added to the language with some significant improvements on
the implementation. Here I will just list some of them:
1. Added a new typing system, so that the type of an variable can be
either declared explicitly or inferred implicitly, and type checking
is performed at compiling time when possible. More over the type
information is used for function overloading and function
specialization (with type-optimized VM instructions) according to
paramter types. Some types can be compounded into new types, e.g.,
list<float>, tuple<int,map<string,int>>...
2. A flexible macro-system that allows writting macro in a form close
to BNF, and can be used to define new syntax;
3. Added Asynchronous Function Call (AFC) and Message Passing
Interface (MPI) for further support for concurrent and distributed
programming (still experimental);
4. Added a few new data types, in particular, among which, there is
the new tuple type in which each of the items is typed independently,
for example, if a tuple is consisted of an integer and a string, then
the type of the tuple will be tuple<int,string>; Moreover the items of
a Dao tuple can have field names.
5. The internal data storage scheme is improved to reduce memory
overheads for simple types.
6. Added special support for the main() function, so that the comand
line arguments are mapped to the function parameters, and are checked
against the paremeter types of main().
7. Improved representation of C/C++ types, so that their inheritance
relationships can be still valid in Dao, and they can be derived by
Dao classes directly.
Moreover, this release has included a tool (tools/autobind.dao) which
can do semi-automated wrapping of C/C++ libraries. In fact, many of
the modules released this time are generated by this tool. Just to
list the modules released this time:
DaoCamellia (image processing),
DaoCGI (CGI Web programming),
DaoCLoader (running time wrapping of C libraries, slightly similar to
the ctype module of Python),
DaoDataModel (database handling, can be used to set up mappng between
data tables and Dao class types),
DaoFastCGI (CGI Web programming),
DaoLapack (linear algebra library),
DaoMagick (image processing),
DaoMGL (math plotting),
DaoMySQL (database),
DaoOpenGL (3D graphics),
DaoSDL (multi-media),
DaoTCC (embedding C codes into Dao scripts),
DaoXML (handling XML documents and fetching web pages from web
servers),
DaoZlib (compression),
DaoVTK (3D data and model visualization).
I believe this release has become suitable for some practical
applications, and worth to be tried out. Then a formal release of the
1.0 version will be made available during this august or september. I
would be very grateful, if anyone can give me some suggestions for
improvement, and feature requests are of couse also welcome. Thanks
and
enjoy,
Limin
homepage: http://www.xdao.org
sourceforge project: http://sourceforge.net/projects/daoscript/
download: https://sourceforge.net/project/showfiles.php?group_id=141871&package_id=273540&release_id=594971
------------------------------
Date: Fri, 25 Apr 2008 15:42:35 -0700
From: "Gordon Etly" <get@bentsys.com>
Subject: Re: FAQ 1.12 What's the difference between "perl" and "Perl"?
Message-Id: <67f52tF2ngu0mU1@mid.individual.net>
Uri Guttman wrote:
>>>>>> "PS" == PerlFAQ Server <brian@stonehenge.com> writes:
>
>> 1.12: What's the difference between "perl" and "Perl"?
>
>> You may or may not choose to follow this usage. For example,
>> parallelism means "awk and perl" and "Python and Perl" look
>> good, while "awk and Perl" and "Python and perl" do not. But
>> never write "PERL", because perl is not an acronym, apocryphal
>> folklore and post-facto expansions notwithstanding.
>
> what good timing! the appropriate official FAQ entry about not writing
> PERL shows up soon after the never dying thread on that stupid
> subject.
That was thread was over with and yet here you are bringing up the
subject? Isn't that exactly what you told myself and others NOT to do?
> and notice how none of the PERL usage flamers are back helping with
> the usual questions and problems posted here.
I'm not above helping. It's a question of how much time one can devote.
Either way that was never the issue and certainally not a requirement to
comment as you tried to put it. (I actually work as a helper on other
lists fwiw.)
Lastly, I would put forth that the language in this FAQ be less
ambiguous.
Perhaps, isntead of,
But never write "PERL", because perl is not an acronym,
apocryphal folklore and post-facto expansions notwithstanding.
,
it could be something like,
"PERL" is not an acronym per-se, but a backcronym, as defined
in the Perl man page.
--
G.Etly
------------------------------
Date: Sat, 26 Apr 2008 03:21:12 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: FAQ 1.12 What's the difference between "perl" and "Perl"?
Message-Id: <x74p9p9u8m.fsf@mail.sysarch.com>
>>>>> "GE" == Gordon Etly <get@bentsys.com> writes:
GE> Uri Guttman wrote:
>>>>>>> "PS" == PerlFAQ Server <brian@stonehenge.com> writes:
>>
>>> 1.12: What's the difference between "perl" and "Perl"?
>>
>>> You may or may not choose to follow this usage. For example,
>>> parallelism means "awk and perl" and "Python and Perl" look
>>> good, while "awk and Perl" and "Python and perl" do not. But
>>> never write "PERL", because perl is not an acronym, apocryphal
>>> folklore and post-facto expansions notwithstanding.
>>
>> what good timing! the appropriate official FAQ entry about not writing
>> PERL shows up soon after the never dying thread on that stupid
>> subject.
GE> That was thread was over with and yet here you are bringing up the
GE> subject? Isn't that exactly what you told myself and others NOT to do?
>> and notice how none of the PERL usage flamers are back helping with
>> the usual questions and problems posted here.
GE> I'm not above helping. It's a question of how much time one can devote.
GE> Either way that was never the issue and certainally not a requirement to
GE> comment as you tried to put it. (I actually work as a helper on other
GE> lists fwiw.)
two posts today and not one with perl help. good ratio.
GE> Lastly, I would put forth that the language in this FAQ be less
GE> ambiguous.
GE> Perhaps, isntead of,
GE> But never write "PERL", because perl is not an acronym,
GE> apocryphal folklore and post-facto expansions notwithstanding.
GE> ,
GE> it could be something like,
GE> "PERL" is not an acronym per-se, but a backcronym, as defined
GE> in the Perl man page.
and you couldn't say that during the entire flame war about PERL?
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Fri, 25 Apr 2008 23:42:28 -0700
From: "Gordon Etly" <get@bentsys.com>
Subject: Re: FAQ 1.12 What's the difference between "perl" and "Perl"?
Message-Id: <67g16lF2nkk4oU1@mid.individual.net>
Uri Guttman wrote:
>>>>>> "GE" == Gordon Etly <get@bentsys.com> writes:
>
>> Uri Guttman wrote:
> >>>>>>> "PS" == PerlFAQ Server <brian@stonehenge.com> writes:
...
>> Lastly, I would put forth that the language in this FAQ be less
>> ambiguous.
>
>> Perhaps, isntead of,
>> But never write "PERL", because perl is not an acronym,
>> apocryphal folklore and post-facto expansions notwithstanding.
>> ,
>> it could be something like,
>> "PERL" is not an acronym per-se, but a backcronym, as defined
>> in the Perl man page.
>
> and you couldn't say that during the entire flame war about PERL?
That is actually a combination of what I said and what others responded
with. The key parts are, 1, that there is a connection between the
expansion and "PERL", and that 2, "PERL" shouldn't be wrong to use if
you mean it as a short for that expansion.
This is nothing really different than what I've said all along. If you
and others weren't on your hell bent crusade at the time maybe you would
of grasped that then as you seem to have finally done so now, and so I
thank you for finally showing some civility.
--
G.Etly
------------------------------
Date: Fri, 25 Apr 2008 15:45:27 -0700
From: dummy@phony.info
Subject: Re: FAQ 2.9 What are the Perl newsgroups on Usenet? Where do I post questions?
Message-Id: <pin414ptbls45hskhc3stuk4ll90e3if6g@4ax.com>
On Fri, 25 Apr 2008 06:03:02 -0700, PerlFAQ Server
<brian@stonehenge.com> wrote:
>This is an excerpt from the latest version perlfaq2.pod, which
>comes with the standard Perl distribution. These postings aim to
>reduce the number of repeated questions as well as allow the community
>to review and update the answers. The latest version of the complete
>perlfaq is at http://faq.perl.org .
>
>--------------------------------------------------------------------
>
>2.9: What are the Perl newsgroups on Usenet? Where do I post questions?
>
> Several groups devoted to the Perl language are on Usenet:
>
> comp.lang.perl.announce Moderated announcement group
> comp.lang.perl.misc High traffic general Perl discussion
> comp.lang.perl.moderated Moderated discussion group
> comp.lang.perl.modules Use and development of Perl modules
> comp.lang.perl.tk Using Tk (and X) from Perl
>
> comp.infosystems.www.authoring.cgi Writing CGI scripts for the Web.
>
> Some years ago, comp.lang.perl was divided into those groups, and
> comp.lang.perl itself officially removed. While that group may still be
> found on some news servers, it is unwise to use it, because postings
> there will not appear on news servers which honour the official list of
> group names. Use comp.lang.perl.misc for topics which do not have a
> more-appropriate specific group.
>
> There is also a Usenet gateway to Perl mailing lists sponsored by
> perl.org at nntp://nntp.perl.org , a web interface to the same lists at
> http://nntp.perl.org/group/ and these lists are also available under the
> "perl.*" hierarchy at http://groups.google.com . Other groups are listed
> at http://lists.perl.org/ ( also known as http://lists.cpan.org/ ).
>
> A nice place to ask questions is the PerlMonks site,
> http://www.perlmonks.org/ , or the Perl Beginners mailing list
> http://lists.perl.org/showlist.cgi?name=beginners .
>
> Note that none of the above are supposed to write your code for you:
> asking questions about particular problems or general advice is fine,
> but asking someone to write your code for free is not very cool.
>
>
According to GOOGLE, aside from some spam in 2007, the last message in
c.i.w.a.c was late in 2006. Seems to be dead!
------------------------------
Date: Sat, 26 Apr 2008 04:42:20 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat Apr 26 2008
Message-Id: <Jzx12K.20Fq@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Bundle-Net-SNMP-Mixin-0.09
http://search.cpan.org/~gaissmai/Bundle-Net-SNMP-Mixin-0.09/
A bundle for Net::SNMP::Mixins
----
CGI-Session-4.30
http://search.cpan.org/~markstos/CGI-Session-4.30/
persistent session data in CGI applications
----
CPAN-1.92_61
http://search.cpan.org/~andk/CPAN-1.92_61/
query, download and build perl modules from CPAN sites
----
Calendar-v0.4.2
http://search.cpan.org/~yewenbin/Calendar-v0.4.2/
Perl extension for calendar convertion
----
Catalyst-Plugin-ConfigComponents-0.1.14
http://search.cpan.org/~pjfl/Catalyst-Plugin-ConfigComponents-0.1.14/
Creates components from config entries
----
Catalyst-Plugin-PageCache-0.18
http://search.cpan.org/~agrundma/Catalyst-Plugin-PageCache-0.18/
Cache the output of entire pages
----
Config-Model-0.622
http://search.cpan.org/~ddumont/Config-Model-0.622/
Framework to create configuration validation tools and editors
----
Data-ResourceSet-0.00001
http://search.cpan.org/~dmaki/Data-ResourceSet-0.00001/
A Bundle Of Resources
----
Data-ResourceSet-0.00002
http://search.cpan.org/~dmaki/Data-ResourceSet-0.00002/
A Bundle Of Resources
----
Encode-Base32-Crockford-1.2
http://search.cpan.org/~hex/Encode-Base32-Crockford-1.2/
encode/decode numbers using Douglas Crockford's Base32 Encoding
----
Games-Go-GTP-0.04
http://search.cpan.org/~deg/Games-Go-GTP-0.04/
Interact with a server or Go playing program using GTP
----
Games-Go-Player-0.07
http://search.cpan.org/~deg/Games-Go-Player-0.07/
plays a game of Go.
----
Games-Go-Referee-0.06
http://search.cpan.org/~deg/Games-Go-Referee-0.06/
Check the moves of a game of Go for rule violations.
----
Games-RailRoad-0.04
http://search.cpan.org/~jquelin/Games-RailRoad-0.04/
a train simulation game
----
Geo-Google-PolylineEncoder-0.03
http://search.cpan.org/~spurkis/Geo-Google-PolylineEncoder-0.03/
encode lat/lngs to Google Maps Polylines
----
HTML-Tested-ClassDBI-0.16
http://search.cpan.org/~bosu/HTML-Tested-ClassDBI-0.16/
Enhances HTML::Tested to work with Class::DBI
----
HTTP-Engine-0.0.1
http://search.cpan.org/~yappo/HTTP-Engine-0.0.1/
----
HTTP-Server-Simple-0.33
http://search.cpan.org/~jesse/HTTP-Server-Simple-0.33/
Lightweight HTTP server
----
HTTPx-Dispatcher-0.01
http://search.cpan.org/~tokuhirom/HTTPx-Dispatcher-0.01/
the uri dispatcher
----
HTTPx-Dispatcher-0.02
http://search.cpan.org/~tokuhirom/HTTPx-Dispatcher-0.02/
the uri dispatcher
----
HTTPx-Dispatcher-0.04
http://search.cpan.org/~tokuhirom/HTTPx-Dispatcher-0.04/
the uri dispatcher
----
IO-Plumbing-0.01
http://search.cpan.org/~samv/IO-Plumbing-0.01/
pluggable, lazy access to system commands
----
IO-Socket-INET-Daemon-0.03
http://search.cpan.org/~jkramer/IO-Socket-INET-Daemon-0.03/
very simple straightforward TCP server
----
IPC-SRLock-0.1.27
http://search.cpan.org/~pjfl/IPC-SRLock-0.1.27/
Set/reset locking semantics to single thread processes
----
Kephra-0.3.8_13
http://search.cpan.org/~lichtkind/Kephra-0.3.8_13/
----
Lingua-EN-Semtags-Engine-0.01
http://search.cpan.org/~igorm/Lingua-EN-Semtags-Engine-0.01/
extract semantic tags (semtags) from English text
----
Lingua-EN-Semtags-Engine-0.02
http://search.cpan.org/~igorm/Lingua-EN-Semtags-Engine-0.02/
extract semantic tags (semtags) from English text
----
Math-Pari-2.010800
http://search.cpan.org/~ilyaz/Math-Pari-2.010800/
Perl interface to PARI.
----
Module-Build-DistVersion-0.02
http://search.cpan.org/~cjm/Module-Build-DistVersion-0.02/
Copy version numbers to secondary locations
----
Net-IMAP-Server-0.5
http://search.cpan.org/~alexmv/Net-IMAP-Server-0.5/
A single-threaded multiplexing IMAP server implementation, using Net::Server::Coro.
----
Net-SNMP-Mixin-0.07_01
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-0.07_01/
mixin framework for Net::SNMP
----
Net-SNMP-Mixin-0.08
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-0.08/
mixin framework for Net::SNMP
----
Net-SNMP-Mixin-0.09
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-0.09/
mixin framework for Net::SNMP
----
Net-SNMP-Mixin-Dot1abLldp-0.08
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-Dot1abLldp-0.08/
mixin class for the Link Layer Discovery Protocol
----
Net-SNMP-Mixin-Dot1dBase-0.04
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-Dot1dBase-0.04/
mixin class for the switch dot1d base values
----
Net-SNMP-Mixin-Dot1dStp-0.02
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-Dot1dStp-0.02/
mixin class for 802.1D spanning tree information
----
Net-SNMP-Mixin-Dot1qFdb-0.03
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-Dot1qFdb-0.03/
mixin class for 802.1-Q switch forwarding databases
----
Net-SNMP-Mixin-IfInfo-0.03
http://search.cpan.org/~gaissmai/Net-SNMP-Mixin-IfInfo-0.03/
mixin class for interface related infos
----
PDE-v0.2.13
http://search.cpan.org/~yewenbin/PDE-v0.2.13/
Perl Development Environment in emacs
----
Process-DropPrivs-v0.1
http://search.cpan.org/~dmartin/Process-DropPrivs-v0.1/
carefully drop root privileges
----
RDF-Trine-0.107
http://search.cpan.org/~gwilliams/RDF-Trine-0.107/
An RDF Framework for Perl.
----
SQL-Tokenizer-0.16
http://search.cpan.org/~izut/SQL-Tokenizer-0.16/
A simple SQL tokenizer.
----
SVN-Notify-Filter-Watchers-0.04
http://search.cpan.org/~larrysh/SVN-Notify-Filter-Watchers-0.04/
Subscribe to SVN::Notify commits with a Subversion property.
----
Search-Google-1.0.1
http://search.cpan.org/~ejs/Search-Google-1.0.1/
search Google using the REST (aka AJAX) API
----
Sub-Contract-0.01
http://search.cpan.org/~erwan/Sub-Contract-0.01/
----
XML-Grammar-Screenplay-0.0402
http://search.cpan.org/~shlomif/XML-Grammar-Screenplay-0.0402/
CPAN distribution implementing an XML grammar for screenplays.
----
ZML-0.1.0
http://search.cpan.org/~vvelox/ZML-0.1.0/
A simple, fast, and easy to read binary data storage format.
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Fri, 25 Apr 2008 21:18:30 GMT
From: Jan Claeys <usenet@janc.be>
Subject: Re: pop langs website ranking
Message-Id: <pan.2008.04.25.21.18.33@news.janc.be>
Op Wed, 23 Apr 2008 04:07:31 +0000, schreef Roedy Green:
> The weakness of this approach is it is unusual group of people who will
> voluntarily submit to having their usage spied on. These are not a
> typical group or a large group.
Hello, planet Earth calling?
I guess around 90% of internet users don't care, mostly because they
don't know this is happening (how many people do you think read EULAs?).
Alexa's & Google's & other (often less legal) profiling tools come with
lots of pseudo-freeware applications these days...
--
JanC
------------------------------
Date: Fri, 25 Apr 2008 13:39:50 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: printing a file to a print server prettily
Message-Id: <b5b3bab1-942e-484a-8ccf-78c7b2ca4143@x35g2000hsb.googlegroups.com>
On Apr 25, 2:28 pm, J=FCrgen Exner <jurge...@hotmail.com> wrote:
> You need to create a document in a format that supports those elements,
> e.g. PS or DVI or HTML or PDF or RTF or DOC or DOCX or any of many
> others, and is understood by your printer or can be converted by a
> printer driver into a format that is understood by your printer.
Thanks. After looking at PDF and RTF, I got RTF-Writer (because it
looked a lot simpler) and have created bunches and bunches of RTF
files.
Unfortunately, the files are not printing. We have several categories,
New, Update, Change, etc., and I modified the New files to 'rtf'. Now,
the 'txt' file print just like they did before, but the rtf files are
not printing. You note that the function unlinks the file after
printing. The print message is appearing, but the rtf files are not
coming out of the printer, and the files are not being deleted. This
is curious because either the print message appears and the files are
deleted, or the error message prints and the files are not deleted. I
get the print message but the files are not deleted.
It's not a Perl problem, I don't think. I'm not asking for help, just
complaining. It's 4:35 p.m. on a Friday afternoon, and I'm looking at
coming in tomorrow, so if you can think of anything off the top of
your head, please buzz me.
Thanks, CC.
------------------------------
Date: Fri, 25 Apr 2008 21:19:11 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: printing a file to a print server prettily
Message-Id: <Xns9A8BB02FBDC6Basu1cornelledu@127.0.0.1>
ccc31807 <cartercc@gmail.com> wrote in news:b8102b27-6563-4a6a-94b0-d4a4c01b6cb7@24g2000hsh.googlegroups.com:
> We have an employee who has been used to getting output from an Access
> database. The field names are printed in italic, the values are
> printed in san-serif, and the values have nice little boxes drawn
> around them. She has convinced everyone that they all need pretty
> output rather than a plain ASCII output.
I have read your response to Jurgen as well. I feel your pain ;-)
>
> So ... I'm sitting here wondering how I can convince the printer to
> print some part in italics, some part in sans-serif, and draw pretty
> boxes. Any ideas?
>
> Thanks, CC.
>
> use File::Copy;
> ...
> sub print_file
> {
> $print_file = shift;
> $print_test = copy($print_file, '//serprintserver/SERITS') or
> warn "could not print, $!";
What language does the printer speak? There are, by an large,
two alternatives:
1) The printer speaks Postscript
a) In this case, you can probably insert POD directives in the file
and use pod2ps before sending it to the printer.
b) Use HTML::Template or any other templating module to fill
in a LaTeX template. Run latex and dvips to get the file to print.
(http://search.cpan.org/~andrewf/LaTeX-Driver-0.07/lib/LaTeX/Driver.pm
might be useful here, although I have not used it).
2) The printer speaks PCL. All you really need is PCL 1.
Embed text format switching escape codes in the file. Send file to printer.
Again, a template based approach ought to work here.
The specs are at http://h20000.www2.hp.com/bc/docs/support/SupportManual/bpl13210/bpl13210.pdf
Just out of curiosity, I tried the following:
#!/usr/bin/perl
use strict;
use warnings;
use HTML::Template;
my $PRINTER = q{\\\\AARDVARKVI\\HL2070N};
my $ESC = "\033";
my %c = (
BOLD => "${ESC}(s3B",
_BOLD => "${ESC}(s0B",
ITALIC => "${ESC}(s1S",
_ITALIC => "${ESC}(s0S",
);
my $tmpl = <<EO_TMPL;
<TMPL_LOOP RECIPIENTS>
$c{BOLD}Name:$c{_BOLD} $c{ITALIC}<TMPL_VAR NAME>$c{_ITALIC}
</TMPL_LOOP RECIPIENTS>
EO_TMPL
my $ht = HTML::Template->new( scalarref => \$tmpl );
$ht->param( RECIPIENTS => [
{ NAME => 'No Nonsense' },
{ NAME => 'The Daily Whatever' },
{ NAME => 'Donald Duck' },
]);
open my $PRN, '>', $PRINTER
or die "Cannot open '$PRINTER': $!";
print $PRN $ht->output;
close $PRN or die "Cannot close '$PRINTER': $!";
__END__
This works fine with my Brother laser printer which understands PCL. (Can
you tell I wrote some dot matrix printer drivers in the 80s ;-)
Anyway, choose the approach that works best for you. Use plain
text for data storage and use a prettified version for the clerks to
put in hanging file folders.
Good luck.
Sinan
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
comp.lang.perl.misc guidelines on the WWW:
http://www.rehabitation.com/clpmisc/
------------------------------
Date: Sat, 26 Apr 2008 01:00:42 -0500
From: Ed Morton <morton@lsupcaemnt.com>
Subject: Re: script to find the files with very long names
Message-Id: <4812C50A.2010409@lsupcaemnt.com>
On 6/12/2006 2:34 AM, pui ming Wong wrote:
> My objective is to go down the current directory
> and have the system tells me which files have their names
> longer than say 26 characters
>
> i think mixing the unix find command
> with some other commands might do it.
> But a perl script might do it more tidily and faster ?
find . -name "??????????????????????????*"
That's 26 question marks, or if you prefer to specify a value:
find . -name "$(printf "%26s*"|tr ' ' '?')"
Regards,
Ed.
------------------------------
Date: Fri, 25 Apr 2008 15:56:07 -0700
From: "Gordon Etly" <get@bentsys.com>
Subject: Re: The map function
Message-Id: <67f5s9F2oi2l9U1@mid.individual.net>
A. Sinan Unur wrote:
>>>>>>> "GF" == Gerry Ford <gerry@nowhere.ford> writes:
>
>>> What kind of name is Uri?
>
> What is the point of picking on other people's names when you can't
> even decide what your own name is?
Why assume he was "picking" on him? I thought he meant it in the sense
of where the name comes from, what country/locale/etc? I don't see why
you had to immediately assume the poster was attempting an insult.
--
G.Etly
------------------------------
Date: Fri, 25 Apr 2008 16:15:09 -0700
From: "szr" <szrRE@szromanMO.comVE>
Subject: Re: WWW::Mechanize doesn't always follow_link(text
Message-Id: <futolt02jt0@news4.newsguy.com>
John Bokma wrote:
> "M.O.B. i L." <mikaelb@df.lth.se> wrote:
>
>> John Bokma wrote:
>
> [..]
>
>>> HTML::TreeBuilder, or a module it's using, returns as a
>>> single character, it might be that you have to
>>> use the code instead.
>>>
>>> Comment on
>>> http://johnbokma.com/perl/search-term-suggestion-tool.html says:
>>> ( , stored as char 225)
>>>
>>> So you might want to try: "Edit\xe1Librarians".
>>>
>>> Wild guess.
>>>
>> Thanks! But it should be \xa0.
>
> Yeah, but HTML::TreeBuilder returns it as 225 :-D.
He's after a ' ', which us a non-breaking space, which is ASCII
0xA0 hex or 160 dec. ' ' can even be re-written as ' ' .
--
szr
------------------------------
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 1486
***************************************
