[7945] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 1570 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 2 20:07:39 1998

Date: Fri, 2 Jan 98 17:00:27 -0800
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, 2 Jan 1998     Volume: 8 Number: 1570

Today's topics:
     Re: "Excessive Paranoia" using crypt <*@qz.to>
     Re: "Excessive Paranoia" using crypt <rootbeer@teleport.com>
     ANNOUCE: VMS::Queue 0.03 (Beta release) (Dan Sugalski)
     ANNOUNCE: Math::ematica 1.100 - Perl talks to Mathemati <pfeifer@wait.de>
     ANNOUNCE: Net::IRC 0.43 released (Dennis Taylor)
     ANNOUNCE: Net::Telnet version 3.01 <jay@rgrs.com>
     ANNOUNCE: News::Gateway 0.40 (mail <-> news gatewaying  <rra@stanford.edu>
     Announce: SHA version 1.2 uploaded to CPAN (Uwe Hollerbach)
     Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 2 Jan 1998 22:24:59 GMT
From: Eli the Bearded <*@qz.to>
Subject: Re: "Excessive Paranoia" using crypt
Message-Id: <qz$9801021718@qz.little-neck.ny.us>
Keywords: from just another new york perl hacker

Frank <FHeasley@chemistry.com> wrote:
> I'm trying to implement crypt, but I'm getting this wierd message that
> says "Function not implemented due to excessive paranoia".
> 
> What does this mean?  Is my program "too paranoid", or is perl
> refusing to act because perl is too paranoid?

I bet the "excessive paranoia" being refered to is that of the US
Government's export controls on strong cryptography. (Under ITAR
strong crypto is classified as a "munition" for export purposes.)

Elijah
------
hasn't got an export-RSA-in-a-McQ-limit-sig handy


------------------------------

Date: Fri, 2 Jan 1998 16:00:53 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: Frank <FHeasley@chemistry.com>
Subject: Re: "Excessive Paranoia" using crypt
Message-Id: <Pine.GSO.3.96.980102155913.26534k-100000@user2.teleport.com>

On Fri, 2 Jan 1998, Frank wrote:

> I'm trying to implement crypt, but I'm getting this wierd message that
> says "Function not implemented due to excessive paranoia".
> 
> What does this mean?  

When Perl gives you a message you don't understand, you should first check
the perldiag manpage, which gives more details on hundreds of messages. 
Hope this helps! 

-- 
Tom Phoenix           http://www.teleport.com/~rootbeer/
rootbeer@teleport.com  PGP   Skribu al mi per Esperanto!
Randal Schwartz Case:  http://www.rahul.net/jeffrey/ovs/
              Ask me about Perl trainings!



------------------------------

Date: 2 Jan 1998 23:52:51 GMT
From: sugalskd@osshe.edu (Dan Sugalski)
Subject: ANNOUCE: VMS::Queue 0.03 (Beta release)
Message-Id: <68jukj$blb$1@news1.teleport.com>
Keywords: $GETQUI $SNDJBC VMS queue management

This is the first public beta release of VMS::Queue, a module that
provides functions to list, create, delete, modify, and get information on
VMS queues, queue managers, queue entries, queue characteristics, and
forms. 

The create and modify functions are currently unimplemented, as are the
selective capabilities of the list functions (a script can fetch a list of
all entries, queues, queue managers, forms, or characteristics, but not a
subset of them yet)

The listing, information, and deletion routines are fully functional,
though--it's easy enough to do something like this:

use VMS::Queue;
@EntryList = VMS::Queue::entry_list();
foreach $entrynum (@EntryList) {
  $keyhash = VMS::Queue::entry_info($entrynum);
  print "$keyhash->{ACCOUNT_NAME}\t$keyhash->{ENTRY_NUMBER}\t$keyhash->{JOB_NAME}\n";
}

and list out the account, entry number, and job name for all entries in
all queues.

The archive for this module is currently on (or on its way) CPAN, at
$CPAN/modules/by-authors/Dan_Sugalski/VMS_Queue-0_03.zip. Feedback, both
good and bad, is encouraged and very welcome. 

					Dan




------------------------------

Date: 2 Jan 1998 23:56:41 GMT
From: Ulrich Pfeifer <pfeifer@wait.de>
Subject: ANNOUNCE: Math::ematica 1.100 - Perl talks to Mathematica
Message-Id: <68jurp$bqi$1@news1.teleport.com>

"Happy new year, Miss Sophie!"

After nearly a year Math::ematica, a Perl Interface to the MathLink
library of Mathematica, is back. It's rewritten from scratch (So if
you did not like the old module, give it another try ;-). I consider
this alpha software because the interface might be different in
upcoming releases. Appart from that, the module should be quite usable
(see the README below). I'd be happy about any feedback you care to
provide. Tell me what is needed to make the module (even more ;-)
useful to you.

Math-ematica-1.100.tar.gz should already be propagated through the
Comprehensive Perl Archive Network (CPAN). Get it from:

  http://www.perl.com/CPAN/authors/id/ULPFR/Math-ematica-1.100.tar.gz

"I now declare this bazar opened!"

Ulrich Pfeifer
--
NAME
    Math::ematica - Perl extension for connecting Mathematica(TM)

SYNOPSIS
      use Math::ematica qw(:PACKET :TYPE :FUNC);

WARNING
    This is alpha software. User visible changes can happen any
    time.

    The module is completely rewritten. Literally no line of the old
    stuff is used (don't ask - I've learned a few things since these
    days ;-). If you are using the old 1.006 version, note that the
    interface has changed. If there is an overwhelming outcry, I
    will provide some backward compatibility stuff.

    Feel free to suggest modifications and/or extensions. I do not
    use Mathematica for real work right now and may fail to foresee
    the most urgent needs. Even if you think that the interface is
    great, you are invited to complete the documentation (and fix
    grammos and typos). Since I am no native English speaker, I will
    delay the writing of real documentation until the API has
    stabilized.

    I do develop this module using Mathematica 3.0.1 on a Linux
    2.0.30 box. Let me know, if it does work with other versions of
    Mathematica or does not work on other *nix flavors.

DESCRIPTION
    The `Math::ematica' module provides an interface to the
    MathLink(TM) library. Functions are not exported and should be
    called as methods. Therefore the Perl names have the 'ML' prefix
    stripped. Since Perl can handle multiple return values, methods
    fetching elements from the link return the values instead of
    passing results in reference parameters.

    The representation of the data passed between Perl and
    Mathematica is straight forward exept the symbols which are
    represented as blessed scalars in Perl.

Exported constants
    `PACKET'
         The `PACKET' tag identifies constants used as packet types.

           print "Got result packet" if $link->NextPacket == RETURNPKT;

    `TYPE'
         The `TYPE' tag identifies constants used as elements types.

           print "Got a symbol" if $link->GetNext == MLTKSYM;

Exported functions
    `FUNC'
         The `FUNC' tag currently only contains the `symbol'
         function which returns the symbol for a given name.

           $sym = symbol 'Sin';

The plain interface
    This set of methods gives you direct access to the MathLink
    function. Don't despair if you don't know them too much. There
    is a convenient layer ontop of them ;-). Methods below are only
    commented if they do behave different than the corresponding C
    functions. Look in your MathLink manual for details.

  `new'

    The constructor is just a wrapper around `MLOpenArgv'.

      $link = new Math::ematica '-linklaunch', '-linkname', 'math -mathlink';

    The link is automatically activated on creation and will be
    closed upon destruction.

  `ErrorMessage'

      print $link->ErrorMessage;

  `EndPacket'

  `Flush'

  `NewPacket'

  `NextPacket'

  `Ready'

  `PutSymbol'

  `PutString'

  `PutInteger'

  `PutDouble'

  `PutFunction'

  `GetNext'

  `GetInteger'

  `GetDouble'

  `GetString'

    The method does the appropriate `MLDisownString' call for you.

  `GetSymbol'

    The module does the appropriate `MLDisownSymbol' call for you.
    It also blesses the result string into the package
    `Math::ematica::symbol'.

  `Function'

    Returns the function name and argument count in list context. In
    scalar contex only the function name is returned.

  `GetRealList'

    Returns the array of reals.

The convenience interface
  `PutToken'

    Puts a single token according to the passed data type.

      $link->PutToken(1);               # MLPutInteger

    Symbols are translated to `MLPutFunction' if the arity is
    provided as aditional parameter.

      $link->PutToken(symbol 'Pi');     # MLPutSymbol
      $link->PutToken(symbol 'Sin', 1); # MLPutFunction

  `read_packet'

    Reads the current packet and returns it as nested data
    structure. The implementaion is not complete. But any packet
    made up of `MLTKREAL', `MLTKINT', `MLTKSTR', `MLTKSYM', and
    `MLTKFUNC' should translate correctely. A function symbol `List'
    is dropped automatically. So the Mathematica expression
    `List[1,2,3]' translates to the Perl expression `[1,2,3]'.

    *Mabybe this is *too* convenient?*.

  `call'

    Call is the main convenience interface. You will be able to do
    most if not all using this call.

    Note that the syntax is nearly the same as you are used to as
    *FullForm* in Mathematica. Only the function names are moved
    inside the brackets and separated with ',' from the arguments.
    The method returns the nested data structures read by
    `read_packet'.

      $link->call([symbol 'Sin', 3.14159265358979/2]); # returns something near 1

    To get a table of values use:

      $link->call([symbol 'Table',
                   [symbol 'Sin', symbol 'x'],
                   [symbol 'List', symbol 'x',  0, 1, 0.1]]);

    This returns a reference to an array of doubles.

    You may omit the first `symbol'. *Maybe we should choose the
    default mapping to *Symbol* and require *Strings*s to be marked?*

  `install'

    If you find this too ugly, you may `install' Mathematica
    functions as Perl functions using the `install' method.

      $link->install('Sin',1);
      $link->install('Pi');
      $link->install('N',1);
      $link->install('Divide',2);

      Sin(Divide(Pi(),2.0)) # should return 1 (on machines which can
                            # represent '2.0' *exactely* in a double ;-)

    The `install' method takes the name of the Mathematica function,
    the number of arguments and optional the name of the Perl
    function as argument.

      $link->install('Sin',1,'sin_by_mathematica');

    Make shure that you do not call any *installed* function after
    the `$link' has gone. Wild things will happen!

  `send_packet'

    Is the sending part of `call'. It translates the expressions
    passed to a Mathematica package and puts it on the link.

  `register'

    This method allows to register your Perl functions to
    Mathematica. *Registered* functions may be called during
    calculations.

      sub addtwo {
        $_[0]+$_[1];
      }

      $link->register('AddTwo', \&addtwo, 'Integer', 'Integer');
      $link->call([symbol 'AddTwo',12, 3]) # returns 15

    You may register functions with unspecified argument types using
    undef:

      sub do_print {
        print @_;
      }
      $link->register('DoPrint', undef);
      $link->call(['DoPrint',12]);
      $link->call(['DoPrint',"Hello"]);

AUTHOR
    Ulrich Pfeifer <pfeifer@wait.de>

SEE ALSO
    See also the perl(1) manpage and your Mathematica and MathLink
    documentation. Also check the t/*.t files in the distribution.

ACKNOWLEDGEMENTS
    I wish to thank Jon Orwant of *The Perl Journal*, Nancy Blachman
    from *The Mathematica Journal*, and Brett H. Barnhart from
    *Wolfram Research*.

    Jon brought the earlier versions of this module to the attention
    of Nancy Blachman. She in turn did contact Brett H. Barnhart who
    was so kind to provide a trial license which made this work
    possible.

    So subscribe to *The Perl Journal* and *The Mathematica Journal*
    if you are not subscribed already if you use this module (a
    Mathematica license is needed anyway). You would be nice to nice
    people and may even read something more about this module one
    day ;-)

Copyright
    The Math:ematica module is Copyright (c) 1996,1997 Ulrich
    Pfeifer. Germany. All rights reserved.

    You may distribute under the terms of either the GNU General
    Public License or the Artistic License, as specified in the Perl
    README file.

    Mathematica and MathLink are registered trademarks of Wolfram
    Research.




------------------------------

Date: 2 Jan 1998 23:55:43 GMT
From: corbeau@execpc.com (Dennis Taylor)
Subject: ANNOUNCE: Net::IRC 0.43 released
Message-Id: <68jupv$bpn$1@news1.teleport.com>


     Net::IRC 0.43, the latest version of the Perl tool for IRC clients,
has just been uploaded to CPAN, and should propagate to your friendly
neighborhood CPAN mirror within a day or so.

     A collaborative effort by several members of the EFNet IRC channel
#perl, Net::IRC is an object-oriented interface to the IRC protocol as
defined by RFC 1459. While not yet entirely feature-complete, it has
become quite stable and functional over the past few releases, and further
development is proceeding rapidly. For more information, check out the
Net::IRC homepage at the following URL:

     http://www.execpc.com/~corbeau/irc/
     http://betterbox.net/fimmtiu/irc/    (mirror)


     Please note that Net::IRC requires Perl 5.004 or better. If you have
questions or problems, email the maintainer (me) at corbeau@execpc.com; if
you'd like to help out with Net::IRC development, there's a fairly
low-volume mailing list for interested Perl people. Hope you like it!

                                   Thanks,

                                       the Net::IRC development team

__________________________________________________________________________
Dennis Taylor           "Anyone whose days are all the same and free from
corbeau@execpc.com       want inhabits eternity of a sort."  - Peter Hoeg
__________________________________________________________________________
Internet Depression Resources List:        http://www.execpc.com/~corbeau/




------------------------------

Date: 2 Jan 1998 23:58:27 GMT
From: Jay Rogers <jay@rgrs.com>
Subject: ANNOUNCE: Net::Telnet version 3.01
Message-Id: <68juv3$c0b$1@news1.teleport.com>

I've uploaded Net::Telnet version 3.01 to CPAN.  Look for it at a CPAN
site near you.

    $CPAN/modules/by-module/Net/Net-Telnet-3.01.tar.gz

This version fixes a bug in cmd() where the first line of output
would sometimes be removed.

The routine fhopen() now works with uni-directional pipes like STDIN.
You can use this feature with any perl filehandle to wait for patterns
to appear or to read using a timeout.

See the file ChangeLog in the distribution for a complete list of
changes. 

The latest Perl Journal contains an article on about Net::Telnet.
Buying "The Perl Journal" is one way to help promote Perl - it's also
cool :-)

For those unfamiliar with Net::Telnet, here's some text from the
README file:


                      Net::Telnet, version 3.01


  What's In It For You
  --------------------

   .  You'd like to communicate with another host or device via a
      TELNET port and you'd like some specialized routines to help you
      login and do other interactive things.

   .  You're not familiar with sockets and you want a simple way to
      make client connections to TCP services.

   .  You want to be able to specify your own time-out while
      connecting, reading, and writing.

   .  You're communicating with an interactive program at the other
      end of some socket or pipe and you want to wait for certain
      patterns to appear.


  Archive Location
  ----------------

    .  In the CPAN directory: modules/by-module/Net/

    .  To find a CPAN site near you see http://cpan.perl.org/SITES.html


  Prerequisites
  -------------

    .  Perl Version 5.002 or later

    .  A Windows 95/NT machine requires Perl version 5.003_07 or later

    .  No other modules are required that don't already come with a
       standard distribution of Perl.


  Description
  -----------

    Net::Telnet allows you to make client connections to a TCP port
    and do network I/O, especially to a port using the TELNET
    protocol.  Simple I/O methods such as print, get, and getline are
    provided.  More sophisticated interactive features are provided
    because connecting to a TELNET port ultimately means communicating
    with a program designed for human interaction.  These interactive
    features include the ability to specify a timeout and to wait for
    patterns to appear in the input stream, such as the prompt from a
    shell.

    Here's an example that prints who's logged-on to the remote host
    sparky.  In addition to a username and password, you must also
    know the user's shell prompt, which for this example is bash$

        use Net::Telnet ();
        $t = new Net::Telnet (Timeout => 10,
                              Prompt => '/bash\$ $/');
        $t->open("sparky");
        $t->login($username, $passwd);
        @lines = $t->cmd("/usr/bin/who");
        print @lines;

    See the user documentation for more examples.

    This is an alpha version - meaning that the interface may change
    in future versions.  Contact me, Jay Rogers <jay@rgrs.com>, if you
    find any bugs or have suggestions for improvement.


  Documentation
  -------------

    User documentation in POD format is contained within the module
    source (i.e. the .pm file).  Installing using "make install"
    places this documentation in a man page in the perl library under
    the directory "man/man3".




------------------------------

Date: 2 Jan 1998 23:57:47 GMT
From: Russ Allbery <rra@stanford.edu>
Subject: ANNOUNCE: News::Gateway 0.40 (mail <-> news gatewaying support)
Message-Id: <68jutr$bvg$1@news1.teleport.com>

Ladies and gentlemen, I'm pleased to announce, after almost two years of
work, my robomoderation, moderation support, mail to news gatewaying, and
news to mail gatewaying package has finally reached the alpha release
stage, thanks in large part to the help of Andrew Gierth.  And yes, this
means that those of you I've promised support packages based on this
script, sometimes far too long ago, should expect them very soon.

News::Gateway is a Perl module, requiring Perl 5.003 or later.  The
distribution at this point includes well over a thousand lines of
documentation, not counting the README, TODO list, and changelogs.

In case you were not previously aware of this project, here is an excerpt
from the README:

  Welcome to my attempt to do robomoderation, moderation support, mail to
  news gatewaying, and news to mail gatewaying right.

  Essentially, robomoderators, moderation support programs, and mail to
  news gateways are all the same thing.  They take an incoming message,
  from either an MTA or from a user filtering program like procmail, or
  perhaps even directly from a user's MUA, perform a variety of rewrites
  required to turn an RFC 822 message into an RFC 1024 message, possibly
  perform a variety of checks and additional rewrites suited to the
  particular application, and then hand the message off to a news server.
  News to mail gateways just do exactly the same thing in reverse.

  From extremely simple procmail hacks through Rich Salz's newsgate
  program to the variety of robomoderators and moderation support packages
  written (most notably, Igor Chudov's STUMP), a variety of people have
  tackled different aspects of this problem, but nearly every effort was
  aimed at a particular view or hard-coded various assumptions, and as a
  result the wheel has been reinvented a ridiculous number of times.

  This is an attempt to generalize out the framework, so that people don't
  have to keep writing the same code to read e-mail messages, post
  messages, send e-mail messages, and do the common rewrites, and instead
  can concentrate on the *interesting* parts, namely the checks and
  rewrites they need for their specific application.  News::Gateway is
  *not* a robomoderator or gateway in and of itself.  Rather, it's a
  toolkit for *building* robomoderators and gateways that attempts to take
  care of all of the nitpicking details for you and drastically decrease
  the amount of code you have to write.  And if your problem happens to
  coincide with one of the supplied example programs, you may not have to
  write any code at all.

  It furthermore sets up a consistent interface for those additional
  checks and rewrites, so once they're done they can be generalized and
  included in the News::Gateway distribution and someone else who is
  trying to solve the same problem can just use (or work with) the
  existing code.  This concept of News::Gateway as a library of reusable
  modules is inherent in its design.

To give you a general idea, the *entire* rec.arts.comics.creative
moderation system including the front-end robomoderation system and the
posting script used by the human moderators is only 109 lines of code
using this module.  (And is included as an example.)

Included in the standard release are the following more specific modules:

     anykeyword.al      Require articles to have some keyword.
     bodyheaders.al     Extracts headers from the message body.
     cleanbody.al       Various standard article body cleaning.
     crosspost.al       Limit crossposts and followups.
     headers.al         Rewrite and trim headers.
     keywords.al        Check for required subject line keywords.
     mailpath.al        Generates an X-Mail-Path from Received.
     mailtonews.al      Translate e-mail into a news article.
     moosesign.al       Sign a post with PGPMoose.
     newsgroups.al      Logic to build Newsgroups header.
     nobinaries.al      Detect and reject binary files.
     previoushop.al     Adds the previous mail hop to the Path.
     whitelist.al       Check the From line against valid posters.

Furthermore, modules have a well-defined interface and the full
functionality of Andrew Gierth's News::Article class to work with; most
modules end up only being a couple score lines of code.

This module has just been uploaded to CPAN, and is also available at:
  <URL:ftp://ftp.eyrie.org/pub/software/modules/Gateway-0.40.tar.gz>

It also uses Andrew Gierth's excellent News::Article module and my own
PGP::Sign module (for PGPMoose support), both available from CPAN or from:
  <URL:http://www.erlenstar.demon.co.uk/perl/>
  <URL:ftp://ftp.eyrie.org/pub/software/modules/PGP-Sign-0.08.tar.gz>
respectively.

This package is in current use for moderating rec.arts.comics.creative,
and earlier versions of this package have been used as mail to news
gateways at various sites, including Stanford, and for moderating
humanities.philosophy.objectivism.

There is a mailing list available for support and development.  From the
README:

  If you are interested in being notified of new releases, helping with
  development, developing, testing, or using new modules, or even just
  getting tips on how to use this module, there is a mailing list
  available.  To subscribe, send mail to majordomo@eyrie.org with:

        subscribe gateway-users

  in the body.

Happy New Year, everyone!

-- 
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
 00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print




------------------------------

Date: 2 Jan 1998 23:51:48 GMT
From: uweh@bu.edu (Uwe Hollerbach)
Subject: Announce: SHA version 1.2 uploaded to CPAN
Message-Id: <68juik$bgf$1@news1.teleport.com>

Greetings, All! I have just uploaded version 1.2 of my SHA module to
CPAN; it should propagate to the world in the next few days. If it's
not yet available and you need it in a hurry, please feel free to send
me email. The README file, which summarizes what's new, follows.
Best, Uwe

SHA Perl 5 Extension Version 1.2

This is the Secure Hash Algorithm extension to Perl 5. I have used
Perl 5.003_xx in making this extension, but I know of no reason why
it could not be built with any version >= 5.002. The interface was
originally copied from the MD5 interface by Neil Winton
<N.Winton@axion.bt.co.uk>.

Very brief summary of what's new in 1.2:

o	Easier configuration: automatic determination of byte
	ordering; you get asked whether you want to use SHA or SHA-1
	(default is SHA-1)

o	Correct operation on big- and little-endian, 32- and 64-bit
	machines (I believe). (Not tested on all possible machines...)

o	A new routine that tells which version of the algorithm is
	being used: &SHA::sha_version returns a string, either 'SHA'
	or 'SHA-1', to indicate which one was chosen

To build the extension, unpack this distribution (presumably you have
already succeeded in doing this...), then type

    perl Makefile.PL	# Create a Makefile; this automatically determines
			# your byte order from the Config module, and
			# it also asks you if you want to use the old
			# SHA algorithm or the new SHA-1 algorithm:
			# I recommend the new SHA-1 algorithm

    make		# Build the extension locally; this does
			# require an ANSI C compiler for sha_func.c;
			# on Sparc machines, I have had to manually
			# type "gcc -c -O2 sha_func.c", and that seemed
			# to work successfully...

    make test		# Check to see that everything went ok

    make install	# Install it into the system directory

This creates a dynamically-linked extension. I haven't tried making a
statically-linked extension. If MakeMaker doesn't create a target for
a statically-extended perl executable, you should be able to unpack
this distribution in the ext/ subdirectory of the perl distribution,
then include SHA in the list of statically-linked extensions during
configuration of perl. I have not tried that myself.

This version of the SHA extension module should work under both big-
and little-endian machines with both 32- and 64-bit longs (more
precisely, perl's byteorder configuration variable has one of the
values 1234, 4321, 12345678, 87654321). I have successfully tested the
module under Linux/x86 (1234), Solaris/sparc (4321), and DEC Alpha
(12345678). (I have also tested it under "simulated" 64-bit machines:
using "unsigned long long", I tested 12345678 under Linux/x86, and
87654321 under Solaris/sparc. This requires editing of the files sha.h
and endian.h after the "perl Makefile.PL" and before the "make",
above. These tests were also successful.) I'd be grateful for any
success or failure reports (or bug fixes!) for other architectures. If
you have a weird byte order, say 3412, the extension will fail to
compile, rather than silently computing incorrect hashes. (But it
should be straightforward to add the necessary code to handle other
byte orders.)

After you've installed the SHA extension, you should be able to type
'perl sha_driver.pl -x' or 'perl test.pl' to check if it all worked
ok, including the installation. If the actual results don't match the
expected ones, there's something wrong.

For more details on how to use the extension, look at sha_driver.pl or
at SHA.pod.

This extension is available under the same copyright as Perl itself
is. The C sources in sha_func.c and in sha.h are in the public domain.

Please direct comments to me:
Uwe Hollerbach <uh@alumni.caltech.edu> or <uweh@bu.edu>

-- 
Uwe Hollerbach, Ph.D.                                 uweh@bu.edu
Simulation of Semiconductor Device                    uh@alumni.caltech.edu
Manufacturing & Performance
Dept. of Manufacturing Engineering, Boston University, Boston, Mass.




------------------------------

Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.  

To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.

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.

The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.

The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.

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 V8 Issue 1570
**************************************

home help back first fref pref prev next nref lref last post