Summit & PoGo ???



10/4 M.D.

2006 Southern California Harvest—with Greg Laurie, MercyMe, Kutless, David Crowder Band, and more!



- Agape Michael

... & we all got 2 play the Game Of Life w/Ice Cream & Cake - Hallalujah !!!

 Venus, Jupiter and the Moon are gathering for a beautiful sunset sky show.

http://science.nasa.gov/headlines/y2005/26aug_sunset.htm

Look Up, In The Sky :)

10/4 M.D.

Current Mood: excited

4:50 PM 8/28/2005 ... Boycott Starbucks Gay Agenda
-----------------

Starbucks promotes homosexual agenda with coffee cup
====================================================
http://www.freerepublic.com/focus/f-news/1463909/posts

...

Baptist Press News Photo Download
=================================
http://www.bpnews.net/bpnews.asp?ID=21387

http://www.bpnews.net/photodownload.asp?ID=17309

http://www.bpnews.net/images/IMG20058129264HI.jpg

...

Starbucks Promotes Homosexual Agenda
====================================
http://www.religionjournal.com/showarticle.asp?id=3080

...

SBC says: “LOLZ Starbucks is gay!!1!one1!!!”
============================================
http://rmfo-blogs.com/raekwon/archives/2005/08/16/sbc-says-lolz-starbucks-is-gay1one1/

http://www.oregonliteracy.org/events/images/starbucks%20color%20logo.jpg

...

Starbucks Advocates Homosexual Agenda2005-08-13 19:50:22
========================================================
http://enewsblog.com/Gazette/post/2005-08-13_19:50:22/

...

10/4 M.D.

Current Mood: sad

2005-08/10 ... above is the new 8 1/2 x 11 kitchen magnet made by the grandkids :)

Current Mood: crazy

Jannie, was came across some old B&W photo's the other day, and when I hadn't not uploaded anything in awhile, I thought to add a bit of color and send this on up.  It was taken on a side street by the Hotel Laguna, my Lola is 80 something, or as Flora used to say, "on the sunny side of her 80's" - Agape Michael

P.S. I was going 2 say RIP, but no doubt, she is with the LORD, and hence, enjoying heaven. - Hallelujah !!!

... http://www.livejournal.com/users/slackerastro/13605.html ...

Current Mood: silly

Enjoy Pamela, meanwhile, enjoy the show as well at the following URL: http://www.slackerastronomy.org/

take care M.D.

Current Mood: contemplative

10:32 AM 5/20/2005  ... Using PERL 5 for Web Programming ... 2:26 PM 5/23/2005
------------------

D:\study\perl\book.(s)\seperlcd.CD\EBOOKS\SEPERL\HTML\#_Using_PERL_5_for_Web_Programming-TOC.HTM

-----

[x] read thru chapter 1 ... 01 - Perl Overview

--------------------------------------------------------------------------------
file ... D:\study\perl\book.(s)\seperlcd.CD\Using PERL 5 for Web Programming.txt

ObjectDock is a program that lets you organize your short-cuts and running tasks onto an extremely customizable dock that sits on your desktop.

http://www.stardock.com/products/objectdock/

Lisa,

B on the look out 4 a suspicious X-AOL CD case & try not 2 toss it :)

Your BU is in there kiddo.

FYI: ... it took me less time 2 burn the CD than to scrap all the AOL chaff & glue off the casing :)

10/4 M.D.

Current Mood: crazy

Where is the GRACE ??? ... meanwhile:

From: Michael De Tomaso
Date: Saturday, April 30, 2005 10:52 AM
Newsgroups: comp.lang.perl.misc
Subject: missing the boat

10:21 AM 4/30/2005 ... http://paste.wizbit.be/?i=1380022146&t=t
------------------

Q: given a text file: "arp.txt" as follows:


contents of "arp.txt"
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
D:\study\perl\WIP>type arp.txt

Interface: 192.168.1.100 --- 0x2
Internet Address Physical Address Type

192.168.1.107 00-01-02-7c-94-47 dynamic
192.168.1.109 00-50-ba-a2-90-86 dynamic
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -


I'd like to pull out a specific mac address: "00-50-ba-a2-90-86 "


here is my simple program:
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
#!perl -w

print "where is mdtFRIENDS:\n";
print `grep "00\-50\-ba\-a2\-90\-86" arp.txt`;

print "test over\n";
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Q: why don't get the line with the mac address on the screen?

I can pull it out without perl like this:

D:\study\perl\WIP>grep "00\-50\-ba\-a2\-90\-86" arp.txt
192.168.1.109 00-50-ba-a2-90-86 dynamic

Q: where am I missing the boat???

-----


- thanks & take care M.D.


_ _
| |_ ___ _ __ ___ __ _ | |_ ___ ___
| __| / _ \ | '_ ` _ \ / _` | | __| / _ \ / _ \
| |_ | (_) | | | | | | | | (_| | | |_ | (_) | | __/
\__| \___/ |_| |_| |_| \__,_| \__| \___/ \___|

Current Mood: sad

D:\study\perl\WIP>perl -we 'print join ",", map($_*10,(1..10))'
Can't find string terminator "'" anywhere before EOF at -e line 1.

IRC - UnderNet - #perl

[18:08] < tomatoe > I was reading some of the comp.lang.perl.misc newsgroup and came upon this line of code in a message:
[18:08] < tomatoe > perl -we 'print join ",", map($_*10,(1..10))'
[18:08] < tomatoe > but when I tried to cut-n-paste it into my WIN: ActiveState I got the following Error Message, & don't know why ???
[18:08] < tomatoe > Can't find string terminator "'" anywhere before EOF at -e line 1.

...

[19:37] < black-ice > tomatoe: on windows use " not ' for -e perl lines
[19:37] < black-ice > so, that means you will need to fix the "" inside the oneliner as well.
[19:38] < black-ice > so perl -we "print join ',',map($_*10,(1..10))"

...

D:\study\perl\WIP>perl -we "print join ',',map($_*10,(1..10))"
10,20,30,40,50,60,70,80,90,100

[21:45] < tomatoe > ty black-ice, Quotes " on the outside, & singleQuote on the inside ' worked

- take care M.D.

9:49 AM 4/26/2005 ... Perl 5 by Example David Medinets - ch17
------------------
http://affy.blogspot.com/p5be/ch17.htm
file:///D:/study/perl/book.(s)/perl_5_by_example_by_David_Medinets/ch17.htm

Notes:
======


17 - Command-line Options

[ ] command-line options or switches that you can use

[ ] options are also called switches
they can turn on or turn off different behaviors

[ ] enable you to create short one-time programs

[ ] -e option lets you specify a line of code directly on the command-line

[ ] the -l option to change the line endings in a text file


How Are the Options Specified?

[ ] most frequent way to specify a command-line options is on the command line.

[ ] options are specified using a dash and then a single character followed by arguments

example: perl -I/usr/~john/include script.pl

[ ] can combine options with no arguments


example: perl -cI/usr/~john/include script.pl
perl -c -I/usr/~john/include script.pl


[ ] can also specify command-line options inside your script file using the #! line

[ ] place them following the directory and/or executable name

example: #!/bin/perl -w

Note: Caution: Some UNIX systems will only read the first 32 characters of the #! line


What Are the Options?

[ ] Table 17.1-Perl's Command Line Options

Option Description
------ -------------------------------------------------
-0 specify the record separator

-a must be used in conjunction with either the -n or -p option
automatically feed input lines to the split function

-c check the syntax of your script without fully executing it.

-d start the Perl debugger

-D lets you turn on different behaviors related to the debugging process

-e specify a single line of code on the command line

-F modifies the behavior of the -a option

-i edit files in-place

-I used in conjunction with the -P option
tells the C preprocessor where to look for include files

-l turns on line-ending processing
most often used with the -e option

-n places a loop around your script
most often used with the -e option

-p places a loop around your script
most often used with the -e option

-P will invoke the C preprocessor before compiling your script

-s lets you define custom switches for your script

-S makes Perl search for the script file using the PATH environment variable

-T UNIX-based option turns on taint checking

-u UNIX-based option will cause Perl to dump core after compiling your script

-U UNIX-based option will let Perl do unsafe operations

-v display the version and patchlevel of your Perl executable

-w prints warnings about unsafe programming practices

-x will let you extract a Perl script from the middle of a file
comes in handy when someone has sent you a script via e-mail

-----

Example: Using the -0 Option

[ ] The -0 option will let you change the record separator

[ ] useful if your records are separated by something other than a newline

...


Example: Using the -n and -p Options

[ ] The -n and -p options wrap your script inside loops

...


Example: Using the -i Option

[ ] The -i option lets you modify files in-place

[ ] Perl will automatically rename the input file and open the output file using the original name

[ ] You can force Perl to create a backup file by specifying a file extension for the backup file immediately after the -i

example: perl -p -i.bak -e "s/harry/tom/g;" test.dat


Examples: Using the -s Option

[ ] The -s option lets you create your own custom switches

...


Summary

[ ] options can also be referred to as switches because they turn different behaviors on and off.

[ ] switches can be specified on the command line
or using the #! line inside your script

[ ] The -n option is used to place your script inside of an input loop

[ ] The -p option uses the same loop, but also prints the $_ variable after each pass through the loop

[ ] The -a and -F options are used when you want the input lines to be split into the @F array.

[ ] useful option is -i, which lets you edit files in-place.
good when you are doing a lot of text file manipulation.

-----

From: "Michael De Tomaso" <mdetomaso@bak.rr.com>
Subject: one-time and one-line programs
Date: Monday, April 25, 2005 1:08 PM

In reviewing the -p -e -n command line options, I've been trying to
find/understand more examples...

Q:I'd like to know how many perl people keep a stash of one liners and what
are their favorite quickie code concoctions might be ?

- thanks & take care M.D.


_ _
| |_ ___ _ __ ___ __ _ | |_ ___ ___
| __| / _ \ | '_ ` _ \ / _` | | __| / _ \ / _ \
| |_ | (_) | | | | | | | | (_| | | |_ | (_) | | __/
\__| \___/ |_| |_| |_| \__,_| \__| \___/ \___|



---------- EOC
EOL - tron

[ ] BLOG'ed Thursday, April 26th, 2005 http://www.livejournal.com/users/datamd/2078.html
--------------------------------------------------------------------------------
D:\study\perl\book.(s)\perl_5_by_example_by_David_Medinets\Note.(s)\2005-04-25_Chapter-17_Using_Command-Line_Options_Notes.txt

Current Mood: content

Eureka! is right, finally, U would not belive how many hours I fussed with trying to get something to pan out via a one lineer in perl.  After newsgroups and chat rooms, I scored with David Medinets' book in chapter 17: "perl  5 by example"

D:\study\perl\book.(s)\perl_5_by_example_by_David_Medinets\WIP>type data3.dat
----------------------------------------------------------------------------------------------
12:21 PM 4/25/2005 ... 17 - Command-line Options
------------------
D:\study\perl\book.(s)\perl_5_by_example_by_David_Medinets\WIP>
perl -p -e "1;" data3.dat

-p   This option places a loop around your script.
        It will automatically read a line from the diamond operator,
        execute the script, and then print $_. It is most often used
        with the -e option. See "Examples: Using the -n and -p Options"
        for more information.

-e   This option lets you specify a single line of code on the
 command line. This line of code will be executed in lieu of a
 script file. You can use multiple -e options to create a multiple
 line program - although given the probability of a typing mistake,
 I'd create a script file instead. Semi-colons must be used to end
 Perl statements just like a normal script.
----------------------------------------------------------------------------------------------
-----
EOL - tron

Current Mood: relieved

Got the books fro Dave & the UUASC this morning out of Jannie's car, a few adjustments, and it's about time to install an Apache server for testing of code, etc.

... nuff said ... 10/4 M.D.

11:14 AM 4/18/2005 ... Teach Yourself Perl 5 in 21 days by David Till
------------------
http://docs.rinet.ru:8080/P7/index.htm

Notes:
======

Introduction

[ ] This book is designed to teach you the Perl programming language in just 21 days.

Who Should Read This Book?

[ ] o previous programming experience is required for you to learn everything you need to know about programming with Perl from this book

[ ] If you are familiar with other programming languages, learning Perl will be a snap.

[ ] The only assumption this book does make is that you are familiar with the basics of using the UNIX operating system.

Special Features of This Book

[ ] This book contains some special elements that help you understand Perl features and concepts as they are introduced:

[ ]    Syntax boxes
[ ]    DO/DON'T boxes
[ ]    Notes
[ ]    Warnings
[ ]    Tips

Programming Examples

[ ] Each feature of Perl is illustrated by examples of its use.

End-of-Day Q& A and Workshop

[ ] Each day ends with a Q&A section containing answers to common questions relating to that day's material.

Conventions Used in This Book

[ ] This book uses different typefaces to help you differentiate between Perl code and regular English, and also to help you identify important concepts.

What You'll Learn in 21 Days

[ ] in your first week of learning Perl, you'll learn enough of the basics of Perl to write many useful Perl programs.

...

Running a Perl Program

If Something Goes Wrong

The First Line of Your Perl Program: How Comments Work

[ ] #!/usr/local/bin/perl
[x] #!perl -w

[ ] look at each line of Listing and figure out what it does.

[ ] The first character in the line, the # character, is the Perl comment character

[ ] The ! character is a special character; it indicates what type of program this is.

[ ] The path /usr/local/bin/perl is the location of the Perl executable on your system.

Note: I'm using: This is perl, v5.8.6 built for MSWin32-x86-multi-thread
      (with 3 registered patches, see perl -V for more detail)

[x] D:\study\perl>path
[x] PATH=C:\Perl\bin\;C:\WINDOWS\system32;C:\WINDOWS;...

#!/usr/local/bin/perl
#!C:\Perl\bin\
# program1_1.plx

4:18 PM 4/18/2005 ... http://www.gs.washington.edu/~noble/gs559/lectures/lecture1-pt2.html
-----------------
Also good style - use comments to document code:

#NAME:
#DATE:
#DESCRIPTION:

-----

4:24 PM 4/18/2005 ... http://www.geocities.com/thestarman3/perl/perl.html
-----------------
http://www.geocities.com/thestarman3/perl/prp.gif ... The Starman's Perl Pages - These pages will help you begin your study of the perl programming language.

Although the first line, #!perl , is NOT necessary to run a perl script under Windows™ 95/98/NT, it is good programming practice to make your perl scripts as portable (able to run on many different systems) as possible. On many UNIX-type systems, this line is written as: #!/usr/local/bin/perl and referred to as the "she-bang" line; possibly helpful in remembering that the "bang" character (!) follows the # character. This is a special line (not a comment) that tells those systems which understand it where they can find the perl executable. Windows™95/NT use the PATH statement and their Registry files (containing " file associations" ) instead. The perl executable will try to run any file you ask it to as a perl script, but it's also a good practice to use the .pl extension.

-----

IRC
===
[16:04] <tomatoe> Q: I'm running Perl on a system other than UNIX, Windows 'v5.8.6 built for MSWin32-x86-multi-thread' to be exact. What would be the best replacement for the first line #!/usr/local/bin/perl say with some other line indi-cating the location of the Perl interpreter on your system. Note: My PATH is C:\Perl\bin\
[16:05] <tomatoe> Q: would it be: #!C:\Perl\bin\
[16:09] <defy> #!C:\Perl\bin\perl.exe
[16:10] <defy> I'd assume anyway...
[16:11] <tomatoe> yes, that is where it is, the perl.exe program
[16:12] <tomatoe> ty, now on the unix example, the program is not given but the path only, should Winders, contain the program on that line ???
[16:13] <tomatoe> perhaps the program is listed to indicate what switches / options might be wanted / needed for the program run ???
[16:25] <black-ice> the #! line has no bearing on windows.
[16:25] <black-ice> except for -w etc
[16:26] <black-ice> so #!perl -w will work.
[16:26] <black-ice> and on unix, the #! should point to the binary file, #!/usr/bin/perl is the executable, not a directory.
[16:29] <tomatoe> ty 2 maestro, I guess the only reason for even having that line in the script would then be for portability to real OS that would use the line, right ???
[16:29] <black-ice> on windows, mainly for any command line flags you would pass to perl.
[16:29] <black-ice> such as -w and -T
[16:36] <tomatoe>   -T              enable tainting checks ... ???
[16:36] <tomatoe>   -w              enable many useful warnings (RECOMMENDED) ... made perfect sense
[16:37] <black-ice> read perlsec
[16:37] <black-ice> perldoc perlsec
[16:40] * Cozby_ has joined #perl
[16:40] <tomatoe> *taint mode* U learn somthing everyday :)

...

D:\study\perl\WIP>perldoc perlsec

NAME
    perlsec - Perl security

DESCRIPTION
    Perl is designed to make it easy to program securely even when running
    with extra privileges, like setuid or setgid programs. Unlike most
    command line shells, which are based on multiple substitution passes on
    each line of the script, Perl uses a more conventional evaluation scheme
    with fewer hidden snags. Additionally, because the language has more
    builtin functionality, it can rely less upon external (and possibly
    untrustworthy) programs to accomplish its purposes.

    Perl automatically enables a set of special security checks, called
    *taint mode*, when it detects its program running with differing real
    and effective user or group IDs. The setuid bit in Unix permissions is
    mode 04000, the setgid bit mode 02000; either or both may be set. You
    can also enable taint mode explicitly by using the -T command line flag.
    This flag is *strongly* suggested for server programs and any program
    run on behalf of someone else, such as a CGI script. Once taint mode is
    on, it's on for the remainder of your script.

    While in this mode, Perl takes special precautions called *taint checks*
    to prevent both obvious and subtle traps. Some of these checks are
    reasonably simple, such as verifying that path directories aren't
    writable by others; careful programmers have always used checks like
    these. Other checks, however, are best supported by the language itself,
    and it is these checks especially that contribute to making a set-id
    Perl program more secure than the corresponding C program.

-- More  --

...

[ ] D:\study\perl\WIP\perldoc_-q_command_line.txt

...

Line 2: Statements, Tokens, and <STDIN>

$inputline = <STDIN>;

[ ] This is the first line of code that actually does any work

Statements and Tokens

$inputline = <STDIN>;

[ ] example of a Perl statement
[ ] a statement is one task for the Perl interpreter to perform
[ ] collection of statements performed one at a time.

Tokens and White Space

[ ] Tokens can normally be separated by as many spaces and tabs as you like

[ ] statements can take up as many lines of code as you like.

[ ] white space is the collection of spaces, tabs, and new lines separating one token from another

[ ] use white space to make your programs more readable

[ ] New statements always start on a new line.

[ ] One blank space is used to separate one token from another (except in special cases ...

What the Tokens Do: Reading from Standard Input

$inputline = <STDIN>;

[ ] consists of four tokens

 1 $inputline
 2 =
 3 <STDIN>
 4 ;

The $inputline and = Tokens

[ ] an example of a scalar variable
[ ] a scalar variable can store one piece of information.

[ ] The = token, called the assignment operator

...

[ ] Thus, <STDIN> is stored in the scalar variable $inputline.

The <STDIN> Token and the Standard Input File

[ ] <STDIN>, represents a line of input from the standard input file
[ ] The standard input file, or STDIN for short
[ ] typically contains everything you enter when running a program.

Note: in this case the KeyBoard is <STDIN>

[ ] NOTE: If there are more lines of input than there are <STDIN> tokens, the extra lines of input are ignored

The ; Token

[ ] a special token that tells Perl the statement is complete

Line 3: Writing to Standard Output

print ($inputline);

[ ] statement refers to the library function that is called print

[ ] provided as part of the Perl interpreter

[ ] The print function's task is to send data to the standard output file.
[ ] The standard output file stores data that is to be written to your screen
[ ] sometimes appears in Perl programs under the name STDOUT.

Function Invocations and Arguments

[ ] When a reference to print appears in a Perl program

 Perl interpreter calls, or invokes, the print library function

[ ] This function invocation is similar to a function invocation in C, a GOSUB statement in BASIC ...

[ ] When the Perl interpreter sees the print function invocation,

  it executes the code contained in print and returns to the program when print is finished.

[ ] it executes the code contained in print and returns to the program when print is finished.

 print ($inputline, $inputline);

 In this case, print writes two copies of $inputline to the standard output file.

Error Messages

...

Interpretive Languages Versus Compiled Languages

[ ] Languages such as Perl that are processed by an interpreter are known as interpretive languages.

[ ] If a language is a compiled language, the program you write must be translated into machine-readable code by a special program known as a compiler. In addition, library code might need to be added by another special program known as a linker.
    After the compiler and linker have done their jobs, the result is a program that can be executed on your machine-assuming, of course, that you have written the program correctly. If not, you have to compile and link the program all over again.

[ ] Interpretive languages and compiled languages both have advantages and disadvantages

 ( ) with Perl, it takes very little time to run a program in an interpretive language.
 ( ) Interpretive languages, however, cannot run unless the interpreter is available

 ( ) Compiled programs, on the other hand, can be transferred to any machine that understands them.

Summary

[ ] Perl is a programming language that provides many of the capabilities of a high-level programming language such as C

[ ] Perl programs contain a header comment

[ ] Perl programs also can contain other comments, each of which must be preceded by a #.

[ ] Perl programs consist of a series of statements
[ ] executed one at a time
[ ] Each statement consists of a collection of tokens
[ ] can be separated by white space

[ ] Perl programs call library functions to perform certain predefined tasks.

 example of a library function is print
 writes to the standard output file

[ ] Library functions are passed chunks of information called arguments

 these arguments tell a function what to do.

[ ] The Perl interpreter executes the Perl programs you write

[ ] If it detects an error in your program

 it displays an error message
 uses the error-recovery process to try to continue processing your program

---------- EOC
EOL - tron

BLOG'ed Thursday, April 18th, 2005 http://www.livejournal.com/users/datamd/2005/04/18/
--------------------------------------------------------------------------------
D:\study\perl\book.(s)\Teach_Yourself_Perl_5_in_21_days\Note.(s)\2005-04-18_Chapter-1_Getting-Started_Notes.txt

Current Mood: okay

Well back from the weekends activities, tons of fun with all nine grandkids, and their very dear parents :) ...

... meanwhile, I'm thining of switching gears, or books rather, after browsing through the UUASC library, and grep'ng ( would you believe {Ctrl}+"F" find ... for perl books: ... it's Pizza Knight down on O.C. so I've checked out some beginning books and will try to have them picked up for me if I can't make it down, etc.

R:\Drive-I.L\internet\uuasc.org\perl_books_UUSC_library-requests.txt

[x] 0672308940 Teach Yourself Perl 5 in 21 Days David Till 1 Available
[x] 0789706598 Special Edition Using Perl 5 for Web Programming David Harlan, Paul Doyle, Micheal O Foghlu, Matthew D Healy, Shelley Powers 2 Available
[x] 0789708663 Perl 5 by Example David Medinets 1 Available
[x] 1575210096 Teach Yourself Cgi Programming With Perl in a Week Eric Herrmann 1 Available

UUASC Orange County Chapter
Member Library
To check out a book, click on the ISBN. PLEASE NOTE: This checkout method is temporary until the programming is finished for fully web-driven database updates. In the meantime, please fill in the email so it follows the following format:

SUBJECT: Checkout request
ISBN:
Title:
Requester name:
Requester email:
Requester phone:

I found David Till's, Teach Yourself Perl 5 in 21 Days, online: http://docs.rinet.ru:8080/P7/index.htm and will use this for a bit, until I get some hard copy into my paws ... as it appears to be able to get me on the fast track, and had me doing some i/o hour one.

... more on this later, back to study time, etc.

----------
EOL - tron

Current Mood: hopeful

See other BLOG: http://www.e-commerce-consortium.com/blog/archives/00000114.htm

... meanhile, have a japh, well how about a scan of the T-shirts I got 4 Kepi & I ???

Usage: C:\Perl\bin\perl.exe [switches] [--] [programfile] [arguments]
  -w              enable many useful warnings (RECOMMENDED)

strict - Perl pragma to restrict unsafe constructs http://www.perldoc.com/perl5.8.0/lib/strict.html

10/4 M.D.

Current Mood: embarrassed