[28403] in Perl-Users-Digest
Perl-Users Digest, Issue: 9767 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Sep 26 03:05:37 2006
Date: Tue, 26 Sep 2006 00:05: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 Tue, 26 Sep 2006 Volume: 10 Number: 9767
Today's topics:
Re: An interactive interpreter/shell? <tadmc@augustmail.com>
Re: An interactive interpreter/shell? <robb@acm.org>
Re: An interactive interpreter/shell? <uri@stemsystems.com>
Re: empty fields (reading news)
Re: list vs. array <robb@acm.org>
Re: list vs. array <uri@stemsystems.com>
Re: list vs. array <tadmc@augustmail.com>
Re: list vs. array <tadmc@augustmail.com>
Re: list vs. array <robb@acm.org>
Re: list vs. array <uri@stemsystems.com>
Re: list vs. array <kkeller-usenet@wombat.san-francisco.ca.us>
matching of 1 =~ /1/ <news12@8439.e4ward.com>
Re: matching of 1 =~ /1/ <xicheng@gmail.com>
new CPAN modules on Tue Sep 26 2006 (Randal Schwartz)
Re: sort with Perl .. <tadmc@augustmail.com>
Re: Tk- getOpenFile sticks on W2K server <lev.weissman@creo.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 25 Sep 2006 20:25:51 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: An interactive interpreter/shell?
Message-Id: <slrnehh0cv.4ko.tadmc@magna.augustmail.com>
robb@acm.org <robb@acm.org> wrote:
> Michele Dondi wrote:
>> On 22 Sep 2006 13:46:39 -0700, "robb@acm.org" <robb@acm.org> wrote:
>>
>> >Is there a shell out there that has functionality like Python's
>> >interactive interpreter? I've seen references to a few things out
>>
>> Yes, but it has a strange name. It's called
>>
>> perl -de42
>
> Cute response, but OT.
Invoking perl is not off-topic in the Perl newsgroup.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 25 Sep 2006 22:02:32 -0700
From: "robb@acm.org" <robb@acm.org>
Subject: Re: An interactive interpreter/shell?
Message-Id: <1159246952.916755.175360@d34g2000cwd.googlegroups.com>
>
> again, you are very wrong. that is an actual perl shell.
>
"has functionality like Python's"
?
------------------------------
Date: Tue, 26 Sep 2006 01:48:18 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: An interactive interpreter/shell?
Message-Id: <x73bafw53x.fsf@mail.sysarch.com>
>>>>> "ro" == robb@acm org <robb@acm.org> writes:
>>
>> again, you are very wrong. that is an actual perl shell.
>>
ro> "has functionality like Python's"
ro> ?
has posting attributions? has grammar sensible? has context?
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Sun, 24 Sep 2006 12:55:23 GMT
From: "Mumia W. (reading news)" <paduille.4058.mumia.w@earthlink.net>
Subject: Re: empty fields
Message-Id: <%evRg.580$Y24.546@newsread4.news.pas.earthlink.net>
On 09/24/2006 05:18 AM, Awkish wrote:
> Hi,
> I must parse files of this form:
>
> field1,,,field4,,field6,,,,,,
>
>
> That is, the fields of each line are separated by a comma, and the fields
> can be empty.
>
> With awk I can do this:
>
> awk -F, '{print $6; print NF}'
>
> with the above line I get:
> field6
> 12
> and that's what I want
>
>
> How can I get the same result with Perl?
> I tried:
>
> perl -F, 'print $F[5];print $#F+1'
>
> which gives:
> field6
> 5
>
> Perl drops the "empty" fields after the last non-empty field :-(
It seems to work under Perl 5.8.4 if you don't use automatic-looping or
autosplit:
#!/bin/sh
echo 'field1,,,field4,,field6,,,,,,' | \
perl -wle '
while (<>) {
@F = split /,/, $_;
print $F[5];
print scalar @F;
}
'
__OUTPUT__
field6
12
__HTH__
--
paduille.4058.mumia.w@earthlink.net
------------------------------
Date: 25 Sep 2006 21:13:59 -0700
From: "robb@acm.org" <robb@acm.org>
Subject: Re: list vs. array
Message-Id: <1159244039.709046.265620@m73g2000cwd.googlegroups.com>
Uri Guttman wrote:
> did you even read the differences i listed?
Of course. No reason to get rude. I'm approaching the language like I
approach all languages - as a computer scientist. By using academic-
and industry-standard language, it gives us a common way to
communicate. I've read all the perldocs and many posts. I haven't
looked at the language specification, though. Maybe that'd be helpful.
I couldn't really understand what you're saying in your last post;
Are you talking about the mutability of the data structure?
Or, are you talking about the fact that a "list" is immutable simply
because it's literally specified?
Are you saying that the list notation causes an immutable data
structure to be instantiated, whereas array notation causes a mutable
one to be?
It doesn't sound like it, since a list can be assiged to a named
variable, and it's then mutable.
How would a "list variable" differ from an array?
How would an anonymous array differ from a list?
------------------------------
Date: Tue, 26 Sep 2006 00:28:27 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: list vs. array
Message-Id: <x7bqp3w8t0.fsf@mail.sysarch.com>
>>>>> "ro" == robb@acm org <robb@acm.org> writes:
ro> Uri Guttman wrote:
>> did you even read the differences i listed?
ro> Of course. No reason to get rude. I'm approaching the language
ro> like I approach all languages - as a computer scientist. By using
ro> academic- and industry-standard language, it gives us a common way
ro> to communicate. I've read all the perldocs and many posts. I
ro> haven't looked at the language specification, though. Maybe
ro> that'd be helpful.
you were rude in bitching about lists and arrays in your terminology. i
was responding in kind. there is no language spec for perl5 (perl6 has
one). and if you really are a computer scientist (and not just playing
one on tv) you should know that langs use terms in very specific ways and
they won't bend to your tastes. and also there is no academic and
industry standard language for any of this. have you seen how many
different overloadings of common terms are out there?
ro> I couldn't really understand what you're saying in your last post;
ro> Are you talking about the mutability of the data structure?
ro> Or, are you talking about the fact that a "list" is immutable simply
ro> because it's literally specified?
????
what i said was very clear and any computer scientist should be able to
understand them.
ro> Are you saying that the list notation causes an immutable data
ro> structure to be instantiated, whereas array notation causes a mutable
ro> one to be?
there is no list notation. where do you get ideas like that? there is no
special syntax for lists in perl. none. nada. nil. bupkis. a list is
made by having a list context and some data that is in that context. no
syntax anywhere.
ro> It doesn't sound like it, since a list can be assiged to a named
ro> variable, and it's then mutable.
some CS you are. you don't seem to get the difference between a variable
and a value.
ro> How would a "list variable" differ from an array?
who ever said they are different or the same? perl has arrays and
lists. i was making a point about terminology and what is important in
naming things. variables are not values. lists are values. simple.
ro> How would an anonymous array differ from a list?
as i said, the anon part has nothing to do with a list. anon arrays are
really array refs. you can't take a ref of a list as the list is on the
stack and refs refer to heap allocations. so anon and lists are apples
and oranges.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 25 Sep 2006 23:35:25 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: list vs. array
Message-Id: <slrnehhbgd.7dh.tadmc@magna.augustmail.com>
robb@acm.org <robb@acm.org> wrote:
> How would an anonymous array differ from a list?
An array is on the heap, and a list is on the stack. (that sounds familiar...)
That doesn't help those students who don't have much computer science
though, so I try to put it into layman's terms:
The list is gone once you get the semicolon that ends the
statement it appears in. An array (named or not) can live on.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 25 Sep 2006 20:22:43 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: list vs. array
Message-Id: <slrnehh073.4ko.tadmc@magna.augustmail.com>
robb@acm.org <robb@acm.org> wrote:
[ Please provide an attribution when you quote someone. ]
>> i would say a list is a value (could be generated from a func call or
>> expression) and an array is a variable which can hold a list.
>>
>
> Oy!
>
> IMO, what a crazy distinction.
But one that must be understood if you hope to understand Perl.
It can be crazy, and you can argue it if you like, but you still
need to make the distinction if you need to make sense of Perl.
> Especially since the words 'array' and
> 'list' have meanings in the real world -
And they have meanings in the Perl world.
> for example, different kinds
> of Abstract Data Types.
for example, data and a variable that can hold that kind of data.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 25 Sep 2006 22:15:53 -0700
From: "robb@acm.org" <robb@acm.org>
Subject: Re: list vs. array
Message-Id: <1159247753.079920.244560@d34g2000cwd.googlegroups.com>
Tad McClellan wrote:
>
> An array is on the heap, and a list is on the stack. (that sounds familiar...)
>
Thanks - I hadn't seen it expressed this concisely up till now.
Is it advisable to think about these issues and consider them when
actually doing programming?
For example, when I work with lists and arrays, I usually focus on
issues such as do I want to be manipulating arrays or arrayrefs...
Which do I want to be using in my APIs, etc.
Now that I think about it, I think that part of my confusion is because
I'm used to programming in languages where all variables are references
- Python, Java, etc.
------------------------------
Date: Tue, 26 Sep 2006 01:47:34 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: list vs. array
Message-Id: <x77izrw555.fsf@mail.sysarch.com>
>>>>> "ro" == robb@acm org <robb@acm.org> writes:
ro> Tad McClellan wrote:
>>
>> An array is on the heap, and a list is on the stack. (that sounds familiar...)
>>
ro> Thanks - I hadn't seen it expressed this concisely up till now.
did you read my post? did you see (that sounds familiar...) there? tad
was refering to my post which said the exact same thing. bah.
ro> Is it advisable to think about these issues and consider them when
ro> actually doing programming?
ro> For example, when I work with lists and arrays, I usually focus on
ro> issues such as do I want to be manipulating arrays or arrayrefs...
ro> Which do I want to be using in my APIs, etc.
that makes no sense whatsoever.
ro> Now that I think about it, I think that part of my confusion is because
ro> I'm used to programming in languages where all variables are references
ro> - Python, Java, etc.
that is your problem. you are stuck in other langs world view. this is
perl. learn perl to code in perl. drop all concepts of what you think
perl should be like. perl isn't going to change for you. so you have to
change for perl.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 25 Sep 2006 22:54:14 -0700
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: list vs. array
Message-Id: <6trmu3xa1i.ln2@goaway.wombat.san-francisco.ca.us>
On 2006-09-26, robb@acm.org <robb@acm.org> wrote:
>
> Tad McClellan wrote:
>>
>> An array is on the heap, and a list is on the stack. (that sounds familiar...)
>>
>
> Thanks - I hadn't seen it expressed this concisely up till now.
Uri said it in the exact post to which you posted a followup saying the
distinction was crazy (you snipped the part about the heap and the
stack). Perhaps that's why Tad believes it sounds familiar.
--keith
--
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information
------------------------------
Date: Tue, 26 Sep 2006 00:56:20 -0400
From: Michael Goerz <news12@8439.e4ward.com>
Subject: matching of 1 =~ /1/
Message-Id: <4nrq79Fbp72tU1@uni-berlin.de>
Hi,
what is the difference between this excerpt from my code (where in this
instance $visit->{$field} is set to integer 1, and $pattern was set as
qr/1/), which doesn't work, as the debugging output shows, and the
example code underneath it, which is supposed to do the same thing, and
works just like I expect!
The excerpt from my code:
# checks if visit has to be filtered out
sub is_filtered{
my $self = shift;
my $visit = shift;
while ( my ($field, $pattern) =
each %{ $self->{_excludepatterns} } ){
print "$visit->{$field} =~ $pattern\n"; # DEBUG
if ( $visit->{$field} =~ $pattern){
print "match\n"; # DEBUG
return 1;
} else { print "no match\n";} # DEBUG
}
return 0;
}
Debugging output:
[...]
0 =~ /1/
no match
1 =~ /1/
no match
1 =~ /1/
no match
[...]
The example code:
my $hashr = {};
my $field = 'foo';
$hashr->{$field} = 1;
my $pattern = qr/1/;
if ($hashr->{$field} =~ $pattern){
print "match\n";
} else {
print "no match\n";
}
Why is the behavior not the same???
Thank you,
Michael Goerz
------------------------------
Date: 25 Sep 2006 23:32:00 -0700
From: "Xicheng Jia" <xicheng@gmail.com>
Subject: Re: matching of 1 =~ /1/
Message-Id: <1159252320.757548.90730@i3g2000cwc.googlegroups.com>
Michael Goerz wrote:
> Hi,
>
> what is the difference between this excerpt from my code (where in this
> instance $visit->{$field} is set to integer 1,
> and $pattern was set as qr/1/),
Are you should about this?? if you print out a regex object, you should
expect a result like
(?-xism:ptn)
instead of
/ptn/
Right?
> which doesn't work, as the debugging output shows, and the
> example code underneath it, which is supposed to do the same thing, and
> works just like I expect!
>
> The excerpt from my code:
>
> # checks if visit has to be filtered out
> sub is_filtered{
> my $self = shift;
> my $visit = shift;
> while ( my ($field, $pattern) =
> each %{ $self->{_excludepatterns} } ){
>
> print "$visit->{$field} =~ $pattern\n"; # DEBUG
> if ( $visit->{$field} =~ $pattern){
> print "match\n"; # DEBUG
> return 1;
> } else { print "no match\n";} # DEBUG
>
> }
> return 0;
> }
>
> Debugging output:
> [...]
> 0 =~ /1/
> no match
> 1 =~ /1/
> no match
> 1 =~ /1/
> no match
> [...]
>
>
> The example code:
>
> my $hashr = {};
> my $field = 'foo';
> $hashr->{$field} = 1;
> my $pattern = qr/1/;
if you add one line here:
print "$hashr->{$field} =~ $pattern";
you will get a result like:
1 =~ (?-xism:1)
compared with the result from your real code,
1 =~ /1/
my question to you is: Did you define the $pattern in the hash-table as
a regex object or just a literal string.
Regards,
Xicheng
> if ($hashr->{$field} =~ $pattern){
> print "match\n";
> } else {
> print "no match\n";
> }
>
------------------------------
Date: Tue, 26 Sep 2006 04:42:09 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Tue Sep 26 2006
Message-Id: <J66nq9.161G@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.
App-Info-0.51
http://search.cpan.org/~dwheeler/App-Info-0.51/
Information about software packages on a system
----
AxKit-XSP-L10N-0.04
http://search.cpan.org/~claco/AxKit-XSP-L10N-0.04/
String localization (L10N) taglib for AxKit
----
Bigtop-0.16
http://search.cpan.org/~philcrow/Bigtop-0.16/
A web application data language processor
----
Config-Format-Ini-0.01
http://search.cpan.org/~ioannis/Config-Format-Ini-0.01/
Reads INI configuration files
----
Config-Wild-1.3
http://search.cpan.org/~djerius/Config-Wild-1.3/
parse an application configuration file with wildcard keywords
----
Data-Template-0.0004
http://search.cpan.org/~ferreira/Data-Template-0.0004/
Generate data structures from templates
----
File-Size-0.03
http://search.cpan.org/~ofer/File-Size-0.03/
Get the size of files and directories
----
Finance-InteractiveBrokers-TWS-v0.0.8
http://search.cpan.org/~jstrauss/Finance-InteractiveBrokers-TWS-v0.0.8/
Lets you talk to Interactivebrokers Trader's Workstation using Perl.
----
GDS2-2.09a
http://search.cpan.org/~schumack/GDS2-2.09a/
GDS2 stream module
----
Geo-Coder-YahooJapan-0.02
http://search.cpan.org/~kuma/Geo-Coder-YahooJapan-0.02/
a simple wrapper for Yahoo Japan Geocoder API
----
Geo-Postcodes-0.311
http://search.cpan.org/~arne/Geo-Postcodes-0.311/
Base class for the Geo::Postcodes::* modules
----
IMAP-Client-0.12
http://search.cpan.org/~conteb/IMAP-Client-0.12/
Advanced manipulation of IMAP services w/ referral support
----
Inline-Ruby-dRuby-Client-0.0.1
http://search.cpan.org/~tateno/Inline-Ruby-dRuby-Client-0.0.1/
[quick use dRuby object from perl]
----
JavaScript-RPC-0.2
http://search.cpan.org/~bricas/JavaScript-RPC-0.2/
(DEPRECATED) Remote procedure calls from JavaScript
----
Kwiki-RenamePage-0.01
http://search.cpan.org/~drbean/Kwiki-RenamePage-0.01/
Better Names for Misnamed Kwiki Pages
----
Language-Prolog-Yaswi-0.12
http://search.cpan.org/~salva/Language-Prolog-Yaswi-0.12/
Yet another interface to SWI-Prolog
----
Lingua-JA-Hepburn-Passport-0.01
http://search.cpan.org/~miyagawa/Lingua-JA-Hepburn-Passport-0.01/
Hepburn Romanization using Japanese passport rules
----
Log-Dispatch-2.13
http://search.cpan.org/~drolsky/Log-Dispatch-2.13/
Dispatches messages to one or more outputs
----
Math-BigInt-Parts-0.01
http://search.cpan.org/~pjacklam/Math-BigInt-Parts-0.01/
split a Math::BigInt into mantissa and exponent
----
Module-Collection-0.01
http://search.cpan.org/~adamk/Module-Collection-0.01/
Examine a group of Perl distributions
----
Module-Inspector-0.02
http://search.cpan.org/~adamk/Module-Inspector-0.02/
An integrated API for inspecting Perl distributions
----
Module-Inspector-0.03
http://search.cpan.org/~adamk/Module-Inspector-0.03/
An integrated API for inspecting Perl distributions
----
Module-ThirdParty-0.17
http://search.cpan.org/~saper/Module-ThirdParty-0.17/
Provide information for 3rd party modules (outside CPAN)
----
MogileFS-Client-1.03
http://search.cpan.org/~bradfitz/MogileFS-Client-1.03/
client library for the MogileFS distributed file system
----
Net-Blogger-1.02
http://search.cpan.org/~claco/Net-Blogger-1.02/
an OOP-ish interface for accessing a weblog via the Blogger XML-RPC API.
----
Object-Deadly-0.09
http://search.cpan.org/~jjore/Object-Deadly-0.09/
An object that dies whenever examined
----
POE-Component-Client-Ident-1.03
http://search.cpan.org/~bingos/POE-Component-Client-Ident-1.03/
A component that provides non-blocking ident lookups to your sessions.
----
POE-Component-Client-NNTP-1.04
http://search.cpan.org/~bingos/POE-Component-Client-NNTP-1.04/
A component that provides access to NNTP.
----
POE-Component-Client-Whois-1.07
http://search.cpan.org/~bingos/POE-Component-Client-Whois-1.07/
A one shot non-blocking RFC 812 WHOIS query.
----
POE-Component-IRC-5.04
http://search.cpan.org/~bingos/POE-Component-IRC-5.04/
a fully event-driven IRC client module.
----
POE-Component-Server-Ident-1.06
http://search.cpan.org/~bingos/POE-Component-Server-Ident-1.06/
A component that provides non-blocking ident services to your sessions.
----
POE-Filter-Bzip2-1.3
http://search.cpan.org/~bingos/POE-Filter-Bzip2-1.3/
A POE filter wrapped around Compress::Bzip2
----
Params-Util-0.20
http://search.cpan.org/~adamk/Params-Util-0.20/
Simple, compact and correct param-checking functions
----
Path-Class-File-Stat-0.02
http://search.cpan.org/~karman/Path-Class-File-Stat-0.02/
cache and compare stat() calls on a Path::Class::File object
----
Path-Class-Iterator-0.04
http://search.cpan.org/~karman/Path-Class-Iterator-0.04/
walk a directory structure
----
Sdict-2.6
http://search.cpan.org/~swaj/Sdict-2.6/
Module to work with Sdictionary .dct files
----
Socket-Multicast6-0.02
http://search.cpan.org/~njh/Socket-Multicast6-0.02/
Constructors and constants for IPv4 and IPv6 multicast socket operations.
----
Test-Trap-v0.0.18
http://search.cpan.org/~ebhanssen/Test-Trap-v0.0.18/
Trap exit codes, exceptions, output, etc.
----
XML-Compile-0.09
http://search.cpan.org/~markov/XML-Compile-0.09/
Compilation based XML processing
----
XML-LibXML-1.61003
http://search.cpan.org/~pajas/XML-LibXML-1.61003/
Perl Binding for libxml2
----
XML-LibXML-1.61_1
http://search.cpan.org/~pajas/XML-LibXML-1.61_1/
Perl Binding for libxml2
----
XML-LibXML-1.61_2
http://search.cpan.org/~pajas/XML-LibXML-1.61_2/
Perl Binding for libxml2
----
YAML-Tiny-0.11
http://search.cpan.org/~adamk/YAML-Tiny-0.11/
Read/Write YAML files with as little code as possible
----
gearmand-1.03
http://search.cpan.org/~bradfitz/gearmand-1.03/
Gearman client/worker connector.
----
mogilefs-server-2.00_02
http://search.cpan.org/~bradfitz/mogilefs-server-2.00_02/
----
mogilefs-server-2.00_03
http://search.cpan.org/~bradfitz/mogilefs-server-2.00_03/
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: Mon, 25 Sep 2006 20:12:08 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: sort with Perl ..
Message-Id: <slrnehgvj8.4ko.tadmc@magna.augustmail.com>
Taher <tfurnitu@cisco.com> wrote:
> (I guess there is some sort of guidleines for this newsgroup ? If someone can
> point it out to me I shall try to follow it more carefully in future )
It is posted to this newsgroup twice each week.
http://www.augustmail.com/~tadmc/clpmisc.shtml
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 25 Sep 2006 22:42:00 -0700
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Re: Tk- getOpenFile sticks on W2K server
Message-Id: <1159249320.304357.144140@h48g2000cwc.googlegroups.com>
# The initial directory
my $initial_dir = '/';
How do I cause the browser to see all disks from the top,not only my
current disk ?
Thanks
------------------------------
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 V10 Issue 9767
***************************************
