HDTenEightyP/NetNews huggingface dataset:
From: martin@datacomm.ucc.okstate.edu (Martin McCormick)
Subject: Re: postscript file processing
Organization: Oklahoma State University, Stillwater, OK
Date: Tue, 14 Apr 1992 15:19:44 GMT

The subject of Post Script comes up quite frequently in this and other 
discussion groups.  Is there any good electronically available source 
which, at least, gives a good overview of what all those formatting commands
do?  I am looking for electronically available documentation for two reasons.
First of all, I am blind and use a PC equipped with a speech syntheciser
to handle all print-oriented material.  Secondly, electronic documentation
is so much easier to store, retrieve, and index.  No more missing manuals
or needing the book in one place and being somewhere else.  I will 
be glad to post any useful information I receive, here.

Martin McCormick WB5AGZ Stillwater, OK
Oklahoma State University Computer Center Data Communications Group
From: tw@Materna.DE (Thomas Wysocki)
Newsgroups: comp.lang.perl
Subject: Re: getting CAMEL book: where, price, etc.?
Date: 10 Apr 92 07:15:48 GMT

klarenbe@chx400.switch.ch (Paul Klarenberg) writes:

>Hi hackers,

>Please allow me 1 FAQ before the camel book answers all the questions: 
>what book is this (title, author, ISBN, publisher, price)? 

Howdy hacker,
the Camel book is called "Programming perl" by Larry Wall and 
Randal L. Schwartz. Publisher is O'Reilly & Associates, Inc.,
ISBN 0-937175-64-1, the Internet (nuts@ora.com) and UUCP-adresses
(uunet!ora!nuts) was given in case of questions. The price I payed in 
Germany was 68,- DM.

Wish you much fun with Perl, Tom

--
(   Thomas   Wysocki        \                                                \
 )   vox: +49 231 5599 222   )   Mine is the last voice that you will ever    )
(   fax: +49 231 5599 100   (      hear        (Frankie goes to Hollywood)   (
 \   e-mail: tw@Materna.DE   \________________________________________________\
From: scott@toro.MTS.ML.COM (Scott Strool)
Newsgroups: comp.lang.perl
Subject: alternate search space
Keywords: s//g $_
Date: 9 Apr 92 18:15:26 GMT
Organization: Merrill Lynch Municipal Analytics & Systems, NY

How do you specify a different search variable other than setting $_ to
the variable you want to search. I saw =~ and !~ but can't see how to use
them. I want to search and replace a substring and return the replaced string
into the same variable that was searched.

Thanks,
Scott Strool		Consultant
scott@ml.com		Merrill Lynch & Co.
From: pfaffman@pilot.njin.net (Jay Pfaffman)
Newsgroups: comp.lang.perl
Subject: full-page grep
Date: 6 Apr 92 23:37:57 GMT
Distribution: usa
Organization: Rutgers Univ., New Brunswick, N.J.


I'm new to perl and want a script to spit out pages containing a
string.  Pages delimited by ^L's of course.  If someone could mail me
a script, I'd appreciate it.

Thanks.
-- 
Jay Pfaffman, Computer Coordinator        pfaffman@pilot.njin.net
Dwight-Englewood School                   
315 E. Palisade Ave.                      201-569-9500
Englewood, NJ  07631-0489
From: jbotz@mtholyoke.edu (Jurgen Botz)
Newsgroups: comp.lang.perl
Subject: Re: Randal's sigs...
Keywords: Just another Perl hacker
Date: 12 Apr 92 16:45:43 GMT
Article-I.D.: mtholyok.1992Apr12.164543.28418
Organization: Mount Holyoke College

In article <1992Apr10.151116.27309@cis.umassd.edu> stoodt@cis.umassd.edu (Michael Stoodt) writes:
>Randal, do you have a collection of your infinite variations on
>
>print "Just another Perl hacker,"
>
>signature lines, that you could post or put on an ftp site or
>something?  Do you make them up on the fly, or do you prepare them
>ahead of time?

I think Randal's answer to this question should go into the FAQ list.
8-)
--
Jurgen Botz                  |   Internet: JBotz@mtholyoke.edu
Academic Systems Consultant  |     Bitnet: JBotz@mhc.bitnet
Mount Holyoke College        |      Voice: (US) 413-538-2375 (daytime)
South Hadley, MA, USA        | Snail Mail: J. Botz, 01075-0629
Newsgroups: comp.lang.perl
From: stoodt@cis.umassd.edu (Michael Stoodt)
Subject: Randal's sigs...
Keywords: Just another Perl hacker
Organization: University of Massachusetts Dartmouth
Date: Fri, 10 Apr 1992 15:11:16 GMT

Randal, do you have a collection of your infinite variations on

print "Just another Perl hacker,"

signature lines, that you could post or put on an ftp site or
something?  Do you make them up on the fly, or do you prepare them
ahead of time?

             Michael Stoodt
Newsgroups: comp.lang.perl
From: lingley@bwdls49.Berkeley.EDU (COOP William Lingley)
Subject: Daylight Savings Time and timelocal()
Reply-To: lingley@bwdls49.Berkeley.EDU (COOP William Lingley)
Organization: Bell-Northern Research, Ottawa, Canada
Date: Thu, 9 Apr 1992 15:35:52 GMT

Ever since DST took effect, my program is producing dates and times one
hour ahead of expected for dates that are during DST, but not before.
I am getting a date (92/04/07) from the command line, and converting it
to a time in seconds with timelocal(), then later changing it back to a 
date and time format using localtime().  At this point, I receive a one hour
fast answer.  Is this a bug or is there a way to fix or compensate?
Thanks in advance.

William

In the old days, it was not called the Holiday Season; the Christians called it
"Christmas" and went to church; the Jews called it "Hanukka" and went to
synagogue; the atheists went to parties and drank.  People passing each other
on the street would say "Merry Christmas!" or "Happy Hanukka!" or (to the
atheists) "Look out for the wall!"
	-- Dave Barry
Newsgroups: comp.lang.perl
From: chare@unilabs.uucp (Chris Hare)
Subject: more unpack questions
Organization: None: Just Me, Chris Hare
Date: Thu, 16 Apr 1992 03:24:22 GMT

First off, hats off to Larry for designing PERL ...
Secondly, to all the folks who have put up with my stupid questions (one
day I'll learn ... promise.)

Anyway - here is another which I thought I understood, but for which I'm
probably way off base on.

I have an array of 40 chars, which contains 13 block addresses. (Yes, this
is from an inode).  Each three chars form an address.

If I used the following to unpack the data, I get zeros.  Why?

   ( $di_mode, $di_nlink, $di_uid, $di_gid, $di_size, $di_addr,
	 $di_atime, $di_mtime, $di_ctime ) = unpack( $DiskInode, $ibuf );

   ( $a0, $a1, $a2, $a3, $a4, $a5, $a6, $a7, $a8, $a9, $a10, $a11, 
	 $a12 ) = unpack( "c3 c3 c3 c3 c3 c3 c3 c3 c3 c3 c3 c3 c3", $di_addr );


Thanks 
-- 
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
Chris Hare				UUCP : uunet.ca!choreo!unilabs!chare
SCO Authorized Instructor		Choreo Systems Inc., Ottawa Canada
*** STANDARD DISCLAIMER APPLIES ***	DOMAIN: chare@choreo.ca
From: lingley@bwdls49.Berkeley.EDU (COOP William Lingley)
Newsgroups: comp.lang.perl
Subject: DST and timelocal...again.
Date: 10 Apr 92 14:52:38 GMT
Reply-To: lingley@bwdls49.Berkeley.EDU (COOP William Lingley)
Organization: Bell-Northern Research, Ottawa, Canada

I must thank Peter Vogel for the suggestion, but much to my surprise, the
method didn't work! I tried the following code, which I ripped out of a
current program (so it's a bit choppy):

#!/usr/local/bin/perl
require "/usr/local/lib/perl/getopts.pl";
require "/usr/local/lib/perl/timelocal.pl";

&Getopts('s:e:');
  
if (defined($opt_e)){
    @date=split("/",$opt_e,3);
    $wanted_end=&timelocal(59,59,23,$date[2],$date[1]-1,$date[0]);
    @temp=localtime($wanted_end);
    $wanted_end=&timelocal(@temp);
    }
($SEC,$MIN,$HOUR,$MDAY,$MON,$YEAR,$WDAY,$YDAY,$ISDST)=localtime($wanted_end);
$started=sprintf("%s %s %2s/%s at
%02d:%02d:%02d",$days[$WDAY],$months[$MON],$MDAY,$YEAR,$HOUR,$MIN,$SEC);
 
print "@temp\n";  
print $started;
 
and when run with 92/03/20 gives a good answer of:

59 59 23 20 2 92 5 79 0
  20/92 at 23:59:59

but when run with 92/04/09 gives:

59 59 0 10 3 92 5 100 1
  10/92 at 00:59:59     (...an hour fast)

Thus, it is recognizing it is DST, but still not compensating.  Help!


In the old days, it was not called the Holiday Season; the Christians called it
"Christmas" and went to church; the Jews called it "Hanukka" and went to
synagogue; the atheists went to parties and drank.  People passing each other
on the street would say "Merry Christmas!" or "Happy Hanukka!" or (to the
atheists) "Look out for the wall!"
	-- Dave Barry
Newsgroups: comp.lang.perl
From: merlyn@iWarp.intel.com (Randal L. Schwartz)
Subject: Re: Proposal: Interactive Perl Tutorial
Reply-To: merlyn@iWarp.intel.com (Randal L. Schwartz)
Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA
Date: Fri, 10 Apr 1992 03:47:09 GMT

In article <1992Apr10.004555.23450@netlabs.com>, lwall@netlabs (Larry Wall) writes:
| In article <5fpj!8.jfh@netcom.com> jfh@netcom.com (Jack Hamilton) writes:
| : One problem is that it probably won't help MS-DOS users, since we don't
| : have curseperl.  Possibly OS/2 and any other non-Unix implementation would
| : have the same problem.  
| : 
| : But it won't be the first time we've been ignored.  
| 
| I hope you're not expecting me to do something about that.  I'm not
| an MS-DOS hacker, nor do I even have MS-DOS at home.  I'm entirely reliant
| on other folk's good natures to port anything to MS-DOS.  I'm not a
| software company, appearances to the contrary.

In fact, that's why "Programming Perl" is so light on talking about
the MS/DOS ports.  Neither Larry nor I are MS/DOS users (thank
goodness; see my .sig for why :-).
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Intel: putting the 'backward' in 'backward compatible'..."====/
Newsgroups: comp.lang.perl
From: forrie@morwyn.uucp (Forrie Aldrich)
Subject: Phone Call Logging Program in PERL ?
Date: Fri, 10 Apr 1992 05:33:50 GMT
Organization: VISION GRAPHICS - Dover, NH - USA
X-Bytes: 1176

I realize this might be a comp.sources.wanted question, BUT ... ;-)

This is what I am looking for (preferably in Perl):  a program that
would maintain a phone list... name, address, contact person, etc. etc...
AND have a HOTKEY type option that, while involved in a phone call, would
put you into a section so that you could take notes on a call... the
notes you take on the call would be identified with a header (containing
the date, etc) and could later be called up by date, etc...

This type of program could be useful in a business situation, as well
as in a job hunting situation... keeping track of contact names, 
responses, positions, etc.

Does anyone know what I am talking about? :)  I've looked EVERYWHERE and
cannot find something like this.  I suppose that, since I have INFORMIX,
that INFOperl (if it is ever created) might come in useful for this, 
however that's not the case right now.  I would think that PERL, itself,
would be sufficient for accomplishing this... an interface with CURSEperl
would look nice. 

If anyone knows of a program around, or has any ideas, please forward
them to me.

Thanks!!
-- 
           -----------        Forrest Aldrich         -----------
           -------     morwyn!forrie@unhtel.unh.edu       -------
           ----                                              ---- 
           --        VISION GRAPHICS -- Dover, NH - USA        --
           ------------------------------------------------------
Newsgroups: comp.lang.perl
From: drw@nevanlinna.mit.edu (Dale R. Worley)
Subject: Re: looking for a C parser
Organization: MIT Dept. of Tetrapilotomy, Cambridge, MA, USA
	<DRW.92Apr8172620@nevanlinna.mit.edu>
	<mcook.702824093@mrc.dev.cdx.mot.com>
Date: Thu, 9 Apr 1992 20:53:07 GMT

In article <mcook.702824093@mrc.dev.cdx.mot.com> mcook@mrc.dev.cdx.mot.com (Michael Cook) writes:
   And (don't tell me!) you sell one?  Written in Perl, right? :-)

No, but my previous employer (Compass) did, before they went broke.
Since I wrote it, I discovered how difficult it is to write a C parser
that really works.

Although I *did* forget about FSF -- because I divide software into
two categories, "hacker" and "commercial", and I mentally file FSF
under "commercial", because it's tightly written, even though they
have an unusual way of financing it.

Dale Worley		Dept. of Math., MIT		drw@math.mit.edu
--
Necessity is the plea for every infringement of human freedom.
It is the argument of tyrants; it is the creed of slaves.
-- William Pitt
From: jja@amy (Joseph Alotta)
Newsgroups: comp.lang.perl
Subject: Re: Writing and reading from /tmp files -PIPES ?
Keywords: tmp files pipes push arrarys
Date: 13 Apr 92 18:45:18 GMT
Article-I.D.: fnbc.1992Apr13.184518.26960
Organization: First National Bank Of Chicago, Chicago IL, USA

In article <1992Apr9.231408.28932@dsg.tandem.com>  
narayan@aravali.everest.tandem.com (Pankaj Narayan) writes:
> If I want to do this in  one script:
>    read input line by line
>   for each line, process it and write a line to a /tmp file
> 
>   in second  pass , read line by line from the /tmp file and
>   process it, and write  to the final (result) file.
> 
>  I would like to get rid of the /tmp file altogether. Seems to be a  
place
> that I could use pipes. But the problem is that I am piping back data to
> code in the same script. How would I do it ?

I don't know it this helps you, but I have a program that reads lines from  
a file, parses into fields, calcutes some values, joins into one string  
with a ":" as separator, pushes each string into an array, sorts the array  
and then processes and writes them out in order.

As long as your file is not massive, you won't need /tmp files. 

Joe Alotta
First Chicago Corp.
jja@fnbc.com
(312)732-3439

"Wisdom is better than gold and understanding more valuable than silver."
Newsgroups: comp.lang.perl
From: merlyn@iWarp.intel.com (Randal L. Schwartz)
Subject: Re: Randal's sigs...
Keywords: Just another Perl hacker
Reply-To: merlyn@iWarp.intel.com (Randal L. Schwartz)
Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA
Date: Fri, 10 Apr 1992 23:56:19 GMT

In article <1992Apr10.151116.27309@cis.umassd.edu>, stoodt@cis (Michael Stoodt) writes:
| Randal, do you have a collection of your infinite variations on
| 
| print "Just another Perl hacker,"
| 
| signature lines, that you could post or put on an ftp site or
| something?  Do you make them up on the fly, or do you prepare them
| ahead of time?

Answers in no particular order:

I make them up on the fly, which is why the recent ones have been pale
in comparison to the first year's versions (I'm about 120% booked
right now, and the usenet-time is at a premium).  I have usually tried
to make them use some feature that I had replied about, as sort of a
tie-in (and a clue that they were spontaneous).

Tom Christiansen captured the first year's output into a slide for his
class that he gave at the Jan 1991 Usenix.  He posted that collection
shortly after that (I think).

If you want all of them, you can look them up with wais (there's a
comp.lang.perl server, thank you!) or you can grab the archive of
"every comp.lang.perl article ever posted" and grep through them for
my address.  Sorry, there's no easier way... *I* don't even have them
(which is why I have repeated myself occasionally).

If you missed the first year of JAPH's... you missed some dandies.  A
few that come to mind include: decoding a punched paper tape image (in
one line!), translating morse code, uu*en*coding a binary string,
decoding bits from a field of smileys, and my personal favorite: "old
macdonald".  All of these were created *while* I was replying to an
article (sometimes it takes me 45 minutes to reply, thus :-).

Maybe Tom could dig up his collection, eh?

print "\u\LjUST ANOTHER \u\LpERL HACKER,"
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Intel: putting the 'backward' in 'backward compatible'..."====/
From: spaf@cs.purdue.EDU (Gene Spafford)
Newsgroups: comp.lang.perl
Subject: Re: novice q: finding unique words in a list
Date: 10 Apr 92 16:30:18 GMT
	<1992Apr7.222504.5891@cs.ruu.nl> <JGD.92Apr8175246@kodiak.acl.lanl.gov>
	<18376@ector.cs.purdue.edu> <mcook.702824404@mrc.dev.cdx.mot.com>
Organization: Department of Computer Science, Purdue University
Supersedes: <18395@ector.cs.purdue.edu>

Okay then, if you want "uniq" instead of "unique," this is 
simpler than Jerry's solution:

# uniq
#
# If the current is not equal to the previous, the current is assigned
# to the previous, and the value of the right-hand side of && is true (1)
# This means we "grep" the current array element to output
#
# If the current is equal to the previous, the expression is false
# and the current value is not "grep'd" to output
#
# The net result of the grep, returned as the subroutine value, is
# the array of uniq'd values.
#
# The reason that the right hand side of the conditional is
# ($previous = $_, 1) instead of ($previous = $_) is left as an exercise
# for the reader (Hint: what could be in $_ ?)

sub uniq {
    local($previous) = undef;

    grep((($_ ne $previous) && ($previous = $_, 1)), @_);

}
-- 
Gene Spafford
Software Engineering Research Center & Dept. of Computer Sciences
Purdue University, W. Lafayette IN 47907-1398
Internet:  spaf@cs.purdue.edu	phone:  (317) 494-7825
Newsgroups: comp.lang.perl
From: hochman@milton.u.washington.edu (Daryl Hochman)
Subject: Perl for MS-DOS?
Organization: University of Washington, Seattle
Date: Mon, 13 Apr 1992 05:00:09 GMT


  I would really appreciate answers to these questions:

  Does there exist a version of Perl for ms-dos at an ftp site?
  If there is, how do I go about getting and installing it?

  
  Thanks,

  Daryl Hochman.
From: watson@carssdf.UUCP (- Self Empl. Sys.Integrator)
Newsgroups: comp.lang.perl
Subject: help with type glob -- UNIX 3.2.4
Date: 10 Apr 92 19:43:06 GMT
Distribution: usa
Organization: John Watson (Self Employed System Integrator)

I need help from ONE PERSON, but I don't know how to limit it to that,
so first, if you are reading this after Monday morning, stop here.  Also
I've limited the distribution to USA only, so my waste of bandwidth is
atleast cheaper bandwidth.

I'm trying to debug why 'TYPE GLOB' aka 'PASS BY NAME' doesn't work for me.
Two previous postings with no response suggest that no-one else has the
problem ... so I'm on my own.

If you are also running patch level 19 (current I think) AND
you are configured with -DDEBUGGING and ...

If this program prints OK for you, please run it with -D1040, and email
me the results to      rutgers!carssdf!watson
Or if I've made a stupid mistake I need to know that too.

-------- cut here -------

$x = 'OK';
&mysub($x);

sub mysub {
  local (*y) = @_;
  print $y,"\n";
}

-------- cut here -------

Thanks in advance, John Watson      Self Empl.  Nothing to Disclaim,
                                    Everything is my fault.
Newsgroups: comp.lang.perl
From: "Michael H. Morse" <mmorse@z.nsf.gov>
Subject: taintperl (novice question)
Reply-To: mmorse@z.nsf.gov
Organization: The Internet
Date: Fri, 17 Apr 1992 13:43:24 GMT

I seem to be missing something.  I would assume from reading the camel
book that the following script would cause taintperl to complain:

#!/usr/local/bin/taintperl
print("Input command: ");
$cmd = <STDIN>;
chop $cmd;
system($cmd);
print("done\n");

Yet, on my system, Sparc 2 running SunOS 4.1.1, it runs just fine.

What am I missing?  I would think it would complain because it allows
the person running the script to run any command they like.

Also, am I correct in my thinking that scripts that are included as
"shells" in /etc/passwd have pretty much the same security
implications of setuid scripts?  That is, they can be secure assuming
you are careful with user input, and what other utilities you call?

--Mike
Newsgroups: comp.lang.perl
From: utashiro@InterTech.COM (Kazumasa Utashiro)
Subject: Re: novice q: finding unique words in a list
Organization: InterTech Data Systems, Inc., Cupertino, CA
Date: Sun, 12 Apr 1992 00:16:22 GMT

In article <18413@ector.cs.purdue.edu>
	spaf@cs.purdue.EDU (Gene Spafford) writes:
>Huh?  My solution, 
:
>Works on arbitrary strings, \n terminated or not.  The "ne" operation
>does character-by-character comparison for equality.  As the "memory"
>variable gets set to "undef" it will not match any first entry in the
>argument array, \n terminated or not.

You are correct if your definition of "arbitrary strings"
doesn't include null string.

Speaking in the field of compatibility with uniq(1), null
string is out of scope.  I called this \n terminated.

--utashiro
Newsgroups: comp.lang.perl
From: allen@geac.com (Allen Septon)
Subject: Using split
Date: Wed, 15 Apr 1992 12:41:00 GMT
Distribution: na
Organization: Geac Computer Corporation


$path = "/usr//////"; # just an example

@dirs = split ('\/', $path);

When I printed out the results I only got back 

"usr"

I had expected several elements in the array @dirs to contain NULL strings.
Could someone explain this to me, or is there a bug in PERL.

Please respond by em.

Thanks

Allen Septon
Geac Computers 
Markham, Ontario
allen@geac.com
From: rwh@moose.cccs.umn.edu (RICHARD HOFFBECK)
Newsgroups: comp.lang.perl
Subject: Re: Proposal: Interactive Perl Tutorial
Date: 8 Apr 92 15:01:00 GMT
Article-I.D.: moose.8APR199210011269
Reply-To: rwh@moose.cccs.umn.edu
Organization: Colon Cancer Control Study, University of Minnesota, Minneapolis
News-Software: VAX/VMS VNEWS 1.41


> There's a certain type of perl snob, of which you are apparently one, who
> thinks that perl should only be used by Unix/C wizards, and other people
> don't deserve to be able to use it.

It has more to do with competence than being a snob.  The whole point of
having the source code for tools like PERL is to make it easy to modify
it to taste. A number of people have put a good deal of effort into 
learning PERL/DOS internals to port several versions to PCs; and I am
greatful that they took the time.  There are limitations that I don't
like with the current versions (mostly memory related) but I certainly
don't expect these people to buy a compiler and rebuild PERL for my
convenience.  When time permits, I'll take a crack at it myself if it
hasn't been done already.

I'd also like a version of 4.0 for VMS, but if I want it, I
expect that I'll have to do it myself.  Life can be so tough sometimes!

> Saying "buy a C compiler and get the swears sources and the perl sources
> and learn enough C and MS-DOS internals to make it all work", which is what
> you are suggesting, is analogous to saying "You want a car?  Here
> are the parts."  I don't want to make the thing, I just want to use it.  

And what you're saying is here are the parts, make ME a car! If you don't
want to build your own car, there are plenty of companies that will 
build one for you.  The last I looked, there was a thriving software
industry just waiting to provide you with ready to run tools.  All you
have to do is give them the money.

> OK, what would you suggest (other than doing it myself)?  

Nothing that I would want committed to print :-( If cursperl is that
important to you, you are always free to take the source code for one
of the MS-DOS ports, the source for one of the curses libraries for
DOS, mix in one unix consultant, $$$$, and shake.  You'll have cursperl
for DOS in no time.  You probably won't have any memory to run scripts,
but you'll have cursperl.

--rick

+-----------------------------------------------------------------+
| Richard Hoffbeck               INTERNET: rwh@moose.cccs.umn.edu |
| Colon Cancer Control Study     Packet  : n0lox@wb0gdb.mn.usa.na |
| University of Minnesota        CIS     : 72406,521              |
| Minneapolis, MN 55455          Genie   : rhoffbeck              |
| (612) 627-4151                                                  |
+-----------------------------------------------------------------+