[33099] in Perl-Users-Digest
Perl-Users Digest, Issue: 4375 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Feb 20 16:09:19 2015
Date: Fri, 20 Feb 2015 13:09:04 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 20 Feb 2015 Volume: 11 Number: 4375
Today's topics:
Re: [Completely OT ] Re: Why can I get away with this? <news@todbe.com>
Re: [Completely OT ] Re: Why can I get away with this? <m@rtij.nl.invlalid>
Re: [Completely OT ] Re: Why can I get away with this? <jurgenex@hotmail.com>
Re: [Completely OT ] Re: Why can I get away with this? <m@rtij.nl.invlalid>
Re: [Completely OT ] Re: Why can I get away with this? <lionslair@consolidated.net>
Exported vars and functions of a module <hslee911@yahoo.com>
Re: Exported vars and functions of a module <rweikusat@mobileactivedefense.com>
Re: Exported vars and functions of a module <gamo@telecable.es>
Re: Whitespace in code (Seymour J.)
Re: Whitespace in code (Seymour J.)
Re: Whitespace in code (Seymour J.)
Re: Whitespace in code <news@lawshouse.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 19 Feb 2015 02:42:52 -0800
From: "$Bill" <news@todbe.com>
Subject: Re: [Completely OT ] Re: Why can I get away with this?
Message-Id: <mc4em7$8bn$1@dont-email.me>
On 2/17/2015 14:10, Martin Eastburn wrote:
> On 2/17/2015 3:34 AM, Martijn Lievaart wrote:
>> On Mon, 16 Feb 2015 20:50:42 -0600, Martin Eastburn wrote:
>>
>>> The 32 and 33 were floating drums machines - think of the IBM floating
>>> ball - in a barrel. They were TTY's I have a 33 today. With manuals.
>>
>> With an 8 bit papertape reader?
>>
>> M4
>>
> The 33 the 32 was a 5 level pink tape.
I maintained those when I was in the service. I even worked on M15s
(giant doorstops) and M28s. But we had mostly Kleinschmidts (shafts
and gears vs springs and bars). Tape came in more than one color -
we used mostly yellow for Baudot 5-level tape.
Also worked on some early Univac computers with paper tape consoles.
I remember writing a blackjack program on paper tape one time.
Things were tough with tape and cards, wasn't till we modified our
Modcomp mini-computers to read word processor disks that things started
to get easier on the way to actual realtime editors on computers. You
could carry a floppy to the machine room instead of a tray of cards
or mag tape.
------------------------------
Date: Thu, 19 Feb 2015 13:41:36 +0100
From: Martijn Lievaart <m@rtij.nl.invlalid>
Subject: Re: [Completely OT ] Re: Why can I get away with this?
Message-Id: <092hrb-fp2.ln1@news.rtij.nl>
On Thu, 19 Feb 2015 02:42:52 -0800, $Bill wrote:
> Things were tough with tape and cards, wasn't till we modified our
> Modcomp mini-computers to read word processor disks that things started
> to get easier on the way to actual realtime editors on computers. You
> could carry a floppy to the machine room instead of a tray of cards or
> mag tape.
Carrying a stack of cards. That brings back memories, not all good.
M4
------------------------------
Date: Thu, 19 Feb 2015 05:08:35 -0800
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: [Completely OT ] Re: Why can I get away with this?
Message-Id: <uvnbeadrj9r5l4s5masgecgfu9vkc7bdl5@4ax.com>
Martijn Lievaart <m@rtij.nl.invlalid> wrote:
>On Thu, 19 Feb 2015 02:42:52 -0800, $Bill wrote:
>
>> Things were tough with tape and cards, wasn't till we modified our
>> Modcomp mini-computers to read word processor disks that things started
>> to get easier on the way to actual realtime editors on computers. You
>> could carry a floppy to the machine room instead of a tray of cards or
>> mag tape.
>
>Carrying a stack of cards.
And dropping them ...
>That brings back memories, not all good.
... while having forgotten to mark their sequence
jue
------------------------------
Date: Thu, 19 Feb 2015 15:31:13 +0100
From: Martijn Lievaart <m@rtij.nl.invlalid>
Subject: Re: [Completely OT ] Re: Why can I get away with this?
Message-Id: <hm8hrb-fp2.ln1@news.rtij.nl>
On Thu, 19 Feb 2015 05:08:35 -0800, Jürgen Exner wrote:
> Martijn Lievaart <m@rtij.nl.invlalid> wrote:
>>On Thu, 19 Feb 2015 02:42:52 -0800, $Bill wrote:
>>
>>> Things were tough with tape and cards, wasn't till we modified our
>>> Modcomp mini-computers to read word processor disks that things
>>> started to get easier on the way to actual realtime editors on
>>> computers. You could carry a floppy to the machine room instead of a
>>> tray of cards or mag tape.
>>
>>Carrying a stack of cards.
>
> And dropping them ...
>
>>That brings back memories, not all good.
>
> ... while having forgotten to mark their sequence
... on the way to the markingg machine.
Glad I'mnot the only one.
M4
------------------------------
Date: Thu, 19 Feb 2015 21:02:57 -0600
From: Martin Eastburn <lionslair@consolidated.net>
Subject: Re: [Completely OT ] Re: Why can I get away with this?
Message-Id: <VtxFw.1776381$UR.670104@fx04.iad>
On 2/19/2015 4:42 AM, $Bill wrote:
> On 2/17/2015 14:10, Martin Eastburn wrote:
>> On 2/17/2015 3:34 AM, Martijn Lievaart wrote:
>>> On Mon, 16 Feb 2015 20:50:42 -0600, Martin Eastburn wrote:
>>>
>>>> The 32 and 33 were floating drums machines - think of the IBM floating
>>>> ball - in a barrel. They were TTY's I have a 33 today. With manuals.
>>>
>>> With an 8 bit papertape reader?
>>>
>>> M4
>>>
>> The 33 the 32 was a 5 level pink tape.
>
> I maintained those when I was in the service. I even worked on M15s
> (giant doorstops) and M28s. But we had mostly Kleinschmidts (shafts
> and gears vs springs and bars). Tape came in more than one color -
> we used mostly yellow for Baudot 5-level tape.
>
> Also worked on some early Univac computers with paper tape consoles.
> I remember writing a blackjack program on paper tape one time.
>
> Things were tough with tape and cards, wasn't till we modified our
> Modcomp mini-computers to read word processor disks that things started
> to get easier on the way to actual realtime editors on computers. You
> could carry a floppy to the machine room instead of a tray of cards
> or mag tape.
>
>
>
I remember the hated key punch machines. Key in a wrong code and
make a student working at night just mad as heck. I always marked
my decks with a Grease 'pen' along one side and a diagonal across to
the other line. Just takes one drop and getting a scrambled set back
is not fun to fix.
I bought my 5 level Baudot tape from Naval surplus and got my yellow
from Teletype.
Still have some ink tape for the 8 level I have. Naval...
Martin
Martin
------------------------------
Date: Wed, 18 Feb 2015 17:04:56 -0800 (PST)
From: James <hslee911@yahoo.com>
Subject: Exported vars and functions of a module
Message-Id: <10dda8dc-45fc-4a96-96f2-f587075672a9@googlegroups.com>
How do I list the exported variables and functions of a module (by default)?
Many thanks.
James
------------------------------
Date: Thu, 19 Feb 2015 01:21:28 +0000
From: Rainer Weikusat <rweikusat@mobileactivedefense.com>
Subject: Re: Exported vars and functions of a module
Message-Id: <874mqilmqv.fsf@doppelsaurus.mobileactivedefense.com>
James <hslee911@yahoo.com> writes:
> How do I list the exported variables and functions of a module (by
> default)?
The question is somewhat unclear. If the Exporter import method is being
used, everything which is exported by default should be in the @EXPORT
array of the exporting module, eg,
print('exports ', join(', ', @the::module:EXPORT));
------------------------------
Date: Thu, 19 Feb 2015 07:08:45 +0100
From: gamo <gamo@telecable.es>
Subject: Re: Exported vars and functions of a module
Message-Id: <mc3ule$e27$1@speranza.aioe.org>
El 19/02/15 a las 02:04, James escribió:
> How do I list the exported variables and functions of a module (by default)?
>
> Many thanks.
> James
>
Here's the template for your module:
---------- 8< --------------
package Some::Module; # assumes Some/Module.pm
use strict;
use warnings;
BEGIN {
use Exporter ();
our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
# set the version for version checking
$VERSION = 1.00;
# if using RCS/CVS, this may be preferred
$VERSION = sprintf "%d.%03d", q$Revision: 1.1 $ =~ /(\d+)/g;
@ISA = qw(Exporter);
@EXPORT = qw(&func1 &func2 &func4);
%EXPORT_TAGS = ( ); # eg: TAG => [ qw!name1 name2! ],
# your exported package globals go here,
# as well as any optionally exported functions
@EXPORT_OK = qw($Var1 %Hashit &func3);
}
our @EXPORT_OK;
# exported package globals go here
our $Var1;
our %Hashit;
# non-exported package globals go here
our @more;
our $stuff;
# initialize package globals, first exported ones
$Var1 = '';
%Hashit = ();
# then the others (which are still accessible as $Some::Module::stuff)
$stuff = '';
@more = ();
# all file-scoped lexicals must be created before
# the functions below that use them.
# file-private lexicals go here
my $priv_var = '';
my %secret_hash = ();
# here's a file-private function as a closure,
# callable as &$priv_func; it cannot be prototyped.
my $priv_func = sub {
# stuff goes here.
};
# make all your functions, whether exported or not;
# remember to put something interesting in the {} stubs
sub func1 {} # no prototype
sub func2() {} # proto'd void
sub func3($$) {} # proto'd to 2 scalars
# this one isn't exported, but could be called!
sub func4(\%) {} # proto'd to 1 hash ref
END { } # module clean-up code here (global destructor)
## YOUR CODE GOES HERE
1; # don't forget to return a true value from the file
-------------- >8 -------------------
This was taken from Perl docs, but I don't remember the version.
--
http://www.telecable.es/personales/gamo/
The generation of random numbers is too important to be left to chance
------------------------------
Date: Wed, 18 Feb 2015 09:42:02 -0500
From: Shmuel (Seymour J.) Metz <spamtrap@library.lspace.org.invalid>
Subject: Re: Whitespace in code
Message-Id: <54e4a4ba$15$fuzhry+tra$mr2ice@news.patriot.net>
In <20150216230617.990@kylheku.com>, on 02/17/2015
at 07:31 AM, Kaz Kylheku <kaz@kylheku.com> said:
>The so-called "non-modal" editors in which most inputs have the
>action of inserting a character and remaining in the initial state
>are intuitive, but badly suited for making numerous small, precise
>changes in numerous places.
Neither ISPF PDF EDIT nor XEDIT require modes[1[, TYVM, nor do various
PC editors inspired by them. They work quite well for bulk entry of
text as well as for many small changes.
[1] Well, not in the sense of interpreting keystrokes differently.
I suppose you could call, e.g., the cursor location, a mode.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT <http://patriot.net/~shmuel>
Unsolicited bulk E-mail subject to legal action. I reserve the
right to publicly post or ridicule any abusive E-mail. Reply to
domain Patriot dot net user shmuel+news to contact me. Do not
reply to spamtrap@library.lspace.org
------------------------------
Date: Wed, 18 Feb 2015 09:35:24 -0500
From: Shmuel (Seymour J.) Metz <spamtrap@library.lspace.org.invalid>
Subject: Re: Whitespace in code
Message-Id: <54e4a32c$14$fuzhry+tra$mr2ice@news.patriot.net>
In <slrnme4n5k.fa6.hjp-usenet3@hrunkner.hjp.at>, on 02/16/2015
at 10:10 PM, "Peter J. Holzer" <hjp-usenet3@hjp.at> said:
>Having used KEDIT (a PC clone of the extremely powerful IBM host
>XEDIT,
FSVO clone. It's nice implementation of what it does copy, but it's
missing big chunks. THE[1] is much more complete, and is free to boot.
[1] The Hessling Editor didn't exist when I was using KEDIT, so
porting an XEDIT-based development environment from CMS was
interesting. Yes, remapping the keyboard was nice, but it
didn't make up for the lack of line macros.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT <http://patriot.net/~shmuel>
Unsolicited bulk E-mail subject to legal action. I reserve the
right to publicly post or ridicule any abusive E-mail. Reply to
domain Patriot dot net user shmuel+news to contact me. Do not
reply to spamtrap@library.lspace.org
------------------------------
Date: Wed, 18 Feb 2015 09:29:07 -0500
From: Shmuel (Seymour J.) Metz <spamtrap@library.lspace.org.invalid>
Subject: Re: Whitespace in code
Message-Id: <54e4a1b3$13$fuzhry+tra$mr2ice@news.patriot.net>
In <20150215175704.37@kylheku.com>, on 02/16/2015
at 02:22 AM, Kaz Kylheku <kaz@kylheku.com> said:
>Vim clearly beat all of them (and nothing has caught up since).
gvim?
>> 1. "Workspace & Projects" panels on left side of screen like an IDE.
>Silly Clutter.
De gustibus. Besides, not even m$ would be dumb enough to not make it
optional.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT <http://patriot.net/~shmuel>
Unsolicited bulk E-mail subject to legal action. I reserve the
right to publicly post or ridicule any abusive E-mail. Reply to
domain Patriot dot net user shmuel+news to contact me. Do not
reply to spamtrap@library.lspace.org
------------------------------
Date: Wed, 18 Feb 2015 18:32:10 +0000
From: Henry Law <news@lawshouse.org>
Subject: Re: Whitespace in code
Message-Id: <x5udnUzYD_wkR3nJnZ2dnUVZ8uGdnZ2d@giganews.com>
On 18/02/15 14:42, Shmuel (Seymour J.) Metz wrote:
> ISPF PDF EDIT nor XEDIT require modes
Gosh; this is taking me back. I used to be an XEDIT/Rexx maven. But we
digress, or continue to digress rather.
--
Henry Law Manchester, England
------------------------------
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:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#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 4375
***************************************
