RE: Remote script execution

2004-02-04 Thread Charles K. Clarkson
to be gathered about the machines include : [snip] How are the machines connected? Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED

RE: Remote script execution

2004-02-04 Thread Charles K. Clarkson
Thind, Aman [EMAIL PROTECTED] wrote: : : We have a 100 mbps LAN running tcp\ip...typical to company networks. : : -Original Message- : From: Charles K. Clarkson [mailto:[EMAIL PROTECTED] : Sent: 05 February 2004 11:31 : To: [EMAIL PROTECTED] : Subject: RE: Remote script execution

RE: comparing array value...

2004-02-03 Thread Charles K. Clarkson
: array. Why is this data in an array? If you are going to search it, it would be nicer if it were in a scalar or in a hash. How did it get in an array to begin with? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: Automated script to connect to a web site and change the Password

2004-01-28 Thread Charles K. Clarkson
asking the same question and then you replied with the same exact message again to each of those messages. In all there are six messages cross posted to two email newsgroups (that I know of) to ask one question. What are thinking??? Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc

RE: Automated script to connect to a web site and change the Password

2004-01-28 Thread Charles K. Clarkson
asking the same question and then you replied with the same exact message again to each of those messages. In all there are six messages cross posted to two email newsgroups (that I know of) to ask one question. What are thinking??? Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc

RE: Two-liner to one-liner

2004-01-28 Thread Charles K. Clarkson
: my @teilzeilen = split /\n/, ( $eingabe =~ /(?=Teilnehmer:\n\n)(.+)/s )[0]; I think(?) ( $eingabe =~ /(?=Teilnehmer:\n\n)(.+)/s )[0] is forcing the regex into list context. In scalar context it returns 1 (for success?) and split assumes scalar context of its second argument. HTH, Charles K

RE: using CGI to build a table

2004-01-26 Thread Charles K. Clarkson
( 'Wow. I can multiply!' ) ), Tr( [EMAIL PROTECTED] ), ); } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

RE: using CGI to build a table

2004-01-26 Thread Charles K. Clarkson
names on top I added these two lines unshift @$array_ref, [ 'id no.', 'street no.', 'street name', 'city' ]; $dbh-disconnect or err_trap( 'failed to disconnect at get_date statement\n' ); return $array_ref; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: How to call perl programs from ASP page

2004-01-26 Thread Charles K. Clarkson
/path/to/MakeFile.pl' ) The problem is that Windows doesn't know you want to work the directory that MakeFile.pl is in. It is looking for the file in another directory and telling us that it can't find it. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile

RE: hash of hash of array slices

2004-01-26 Thread Charles K. Clarkson
.. 9 ] ) { HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

RE: hash of hash of array slices

2004-01-26 Thread Charles K. Clarkson
: -Original Message- : From: Paul Kraus [mailto:[EMAIL PROTECTED] : Sent: Monday, January 26, 2004 10:52 AM : To: 'Charles K. Clarkson'; 'Perl Beginners' : Subject: RE: hash of hash of array slices : : : Paul Kraus [EMAIL PROTECTED] wrote: : : : : This works : : : : Foreach

RE: How to call perl programs from ASP page

2004-01-26 Thread Charles K. Clarkson
perl.exe in your servers path, you'll need to complete path to it: my $exit_status = system_call_test( c:/perl/bin/perl.exe $file_path ) / 256; Or something like that. If this doesn't work, show us what prints to the browser. HTH, Charles K. Clarkson -- Head Bottle Washer

RE: How to call perl programs from ASP page

2004-01-26 Thread Charles K. Clarkson
; $Response-Write( Executing this: '$call'brbr ); my $status = system( $call ); $Response-Write( 'system' returned: '$!'br ); return $status; } % HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: using CGI to build a table

2004-01-25 Thread Charles K. Clarkson
. [snipped sub] HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

RE: simple probability problem using PERL (long)

2004-01-25 Thread Charles K. Clarkson
; # the first 'values %sides' is in list context and # the second is in scalar context :) $last_roll = ( values %sides )[ rand values %sides ]; return $last_roll; } # return the last roll sub last_roll { return $last_roll; } } HTH, Charles K

RE: How to call perl programs from ASP page

2004-01-25 Thread Charles K. Clarkson
$status; } % HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

RE: Why is this not a match?

2004-01-24 Thread Charles K. Clarkson
danield [EMAIL PROTECTED] wrote: : : I am unable to find out why is this not matching: : :[snip] : : if ( / Summary Log (generated:/ ) { The open parenthesis '(' has to be escaped. if ( / Summary Log \(generated:/ ) { HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: Tables

2004-01-22 Thread Charles K. Clarkson
could send me an example you think is good, I could translate from function oriented to OO and clean it up a bit. Or you could just send a link. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL

RE: Tables

2004-01-22 Thread Charles K. Clarkson
tables with CGI.pm much any longer. I tend to use HTML::Template since I have graduated to almost programmer and since my web page designer became a whole separate person instead of that voice in my head. (Not that that voice has gone.) HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: how to initialize an array of unknown size to 0?

2004-01-21 Thread Charles K. Clarkson
vaishnavi krishnamurthy [EMAIL PROTECTED] wrote: : Can anyone tell me how I can do the following - all the : elements in my array of unknown size should be initialized : to the value 0? Assuming your array has only one dimension: @array = (0) x @array; HTH, Charles K. Clarkson

RE: How to sort hashkeys by numbersize??

2004-01-20 Thread Charles K. Clarkson
. http://www.stonehenge.com/merlyn/UnixReview/col06.html HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

RE: Search replace using 2 lines for pattern

2004-01-18 Thread Charles K. Clarkson
match \n\nReceived: and : replace it with \nFrom xx\nReceived:. It doesn't seem : difficult but I am stuck. : : I hope someone can help me, I have tried to solve this for hours... Can you show us what you have? It would make solving this much easier. HTH, Charles K. Clarkson -- Head

RE: Search replace using 2 lines for pattern

2004-01-18 Thread Charles K. Clarkson
: -Original Message- : From: Bertrand Mansion [mailto:[EMAIL PROTECTED] : Sent: Sunday, January 18, 2004 7:56 AM : To: Charles K. Clarkson; [EMAIL PROTECTED] : Subject: Re: Search replace using 2 lines for pattern : : : [EMAIL PROTECTED] wrote : : : Bertrand Mansion [EMAIL PROTECTED

RE: Why isn't perl used more in business and industry

2004-01-18 Thread Charles K. Clarkson
Robert [EMAIL PROTECTED] wrote: : : There was a huge outcry from the other programming languages : that Perl was being unfair because it was so good. I hate it when languages cry. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: what is this data structure?

2004-01-16 Thread Charles K. Clarkson
okay for me. Perhaps something else is wrong. Show us everything. aappplebtreecchair HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: Script within a script

2004-01-14 Thread Charles K. Clarkson
the rest of the page as is. This might have the additional benefit of possibly allowing the design to change independent of the content. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED

RE: Matching invalid characters in a URL

2004-01-12 Thread Charles K. Clarkson
of the string / Your anchors are dragging you down. You want to find the first invalid character. After that it doesn't matter. This should be fine. /[^A-Za-z0-9$-_.+!*'(),]/ HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: Do Else Unless Statements Exist?

2004-01-11 Thread Charles K. Clarkson
Dan Anderson [EMAIL PROTECTED] wrote: : : Does Perl have any kind of else / unless statements, sort of : like elsif? I tried: : : if ($foo) { : } : else unless ($bar) { : } What about: elsif ( ! $bar ) { } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes

RE: putting $1 into a var

2004-01-07 Thread Charles K. Clarkson
|!-- VM: resrow --foo!-- VM: /resrow --|; my ($resrow) = m#!-- VM: resrow --(.*?)!-- VM: /resrow --#; print $1; print $resrow; __END__ Prints: foofoo HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL

RE: stop

2004-01-07 Thread Charles K. Clarkson
to everyone being able to *write* directions. Then I would have to become one of those really exceptional programmers instead of just the average one I am today. :) Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e

RE: taking my vbscript to perl

2004-01-04 Thread Charles K. Clarkson
you are trying to copy a directory structure. If that is the case, take a look at 'opendir' and 'readdir' and at the '-X' function in the 'perlfunc' file of your perl documentation. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: large directory handling

2004-01-04 Thread Charles K. Clarkson
you are attempting to do here. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first

RE: create file

2004-01-02 Thread Charles K. Clarkson
to more of us, what is your conclusion? Madmen, Jokers, or something else. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 Get real! This is a discussion group, not a helpdesk. You post something, we discuss its implications

RE: Looping through file for regex

2004-01-02 Thread Charles K. Clarkson
|join '|', keys %genedex|; while ( defined( my $line = DATA ) ) { next unless $line =~ /($gene_regex)/; my $gene = $1; # The split extracts the probe id printf %s\t%s\t%s\n, $gene, ( split /\s/, $line )[0], $genedex{$gene}; } HTH, Charles K. Clarkson -- Head Bottle Washer

RE: hi..

2004-01-02 Thread Charles K. Clarkson
[\][] # character class for [ and ] ) # end capture /\\$1/gx; # replace with \[ or \] globally Having said all this. I would still prefer Rob's solution with two separate regexes in a 'foreach'. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes

RE: mass-replacing large block of text

2003-12-30 Thread Charles K. Clarkson
is SSI (or ASP) enabled, you might consider replacing the existing footer with an included file. That way you will only have to change one file in the future. And it can be adjusted more often. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254

RE: mass-replacing large block of text

2003-12-30 Thread Charles K. Clarkson
include $split in the : new file. The text I want to get replace is from : and including that line to the end of the file. Because you originally said you only wanted to replace everything *after* that particular line. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes

RE: checking duplicates

2003-12-30 Thread Charles K. Clarkson
SilverFox [EMAIL PROTECTED] wrote: : : Hi all, i'm trying to figure out how I can check : for duplicates entries in an array and remove : the duplicate. Read perlfaq4: How can I remove duplicate elements from a list or array? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: modify JPEG on the fly

2003-12-30 Thread Charles K. Clarkson
to send $PixData to a new command that will : convert it from a 640 X 480 @ 100% JPEG to 160 x 120 @ : 30% JPEG. : : Any ideas? I think Randal has a couple of articles on making thumbnails on-the-fly. Have a look at: http://www.stonehenge.com/merlyn/ HTH, Charles K. Clarkson -- Head

RE: Perl Help: Array Manipulation

2003-12-25 Thread Charles K. Clarkson
] ) and the current amount. Then I print the new last total on @totals. Notice that this algorithm will allow any range in $amounts to be totaled, not just consecutive amounts starting from the beginning. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968

RE: Perl Help: Array Manipulation

2003-12-25 Thread Charles K. Clarkson
;-) Test your solution with: @array1[0..5] = ( 1, 4, -200, 8, 15, 0 ); HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

RE: generating GIFs

2003-12-21 Thread Charles K. Clarkson
, 20, $gray ); $im-filledRectangle( 0, 0, 47, 16, $green ); $im-string( gdSmallFont, 3, 3, Test, $black ); my $png = 'testbutton.png'; open PNG, /home/httpd/htdocs/$png or die qq|Can't write $png: $!|; binmode PNG; print PNG $im-png; close PNG; HTH, Charles K. Clarkson -- Head Bottle

RE: generating GIFs

2003-12-21 Thread Charles K. Clarkson
, you might then be able to center the string in a box. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http

RE: Simple string API question

2003-12-20 Thread Charles K. Clarkson
. I think(?) you're looking for 'cmp' which returns -1, 0, or 1 depending on whether the left argument is string wise less than, equal to, or greater than the right argument. $string[1] cmp $string[0] Take a look at perlop Equality Operators. HTH, Charles K. Clarkson -- Head Bottle

RE: Get Terminal Width and Height, Pure Perl

2003-12-15 Thread Charles K. Clarkson
sub. Or, if you're allowed to install multiple files, you could include this module in your package. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

RE: Split question

2003-12-15 Thread Charles K. Clarkson
the special case : where ' ' is passed and the string is split on whitespace : which is not interesting, but where leading space is : skipped? Wait a minute. You're a beginner?!? :) Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: Please help me! Thanks.

2003-12-15 Thread Charles K. Clarkson
pagoda [EMAIL PROTECTED] wrote: : Take a look at the first question in perlfaq4: Why am I getting long decimals (eg, 19.94999) instead of the numbers I should be getting (eg, 19.95)? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists

RE: getting rid of whitespace at the beginning and end of a string

2003-12-12 Thread Charles K. Clarkson
blank space from the beginning/end of a string? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http

RE: hash problems

2003-12-12 Thread Charles K. Clarkson
-[1]{color} $token-[1]{color} eq 'red'; } } print Dumper \%items; __END__ HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

RE: Connecting to SQL 2000 Database

2003-12-08 Thread Charles K. Clarkson
Neill [EMAIL PROTECTED] wrote: : Is their a simple how to page I can access on the web ? http://www.roth.net/perl/odbc/faq/#How%20do%20I%20use%20Win32::ODBC HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe

[OT] Education Level

2003-12-07 Thread Charles K. Clarkson
ago and normally classify myself as finished high school. I'm curious: What level of education have list members attained? TEA, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

RE: [OT] Education Level

2003-12-07 Thread Charles K. Clarkson
? Or is it something serious. It's an attempt at humor. I am a real estate investor in Texas, USA. Since the company is just me and a little real estate, I find it difficult to put President there. Head Bottle Washer keeps me well grounded in reality. HTH, Charles K. Clarkson -- Head

RE: CGI Redirection

2003-11-26 Thread Charles K. Clarkson
of user intervention. If you show us more code and explain what you are trying to do, I might be of more help. Are you indicating that the code you give above isn't working? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: Javascript problems with -script

2003-11-23 Thread Charles K. Clarkson
' }, ], HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: When MUST you use 'map' ?

2003-11-17 Thread Charles K. Clarkson
, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Getting last element of anonymous array

2003-11-15 Thread Charles K. Clarkson
is: $last \n; __END__ HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Help Required might not get you help

2003-11-14 Thread Charles K. Clarkson
-descriptive subjects. Some days I feel like starting a message board for people who like to help on message boards. Then I could post quotes from particularly annoying posts in the Look what the Idiots Posted Today forum. :) Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes

RE: How do you dynamically assign array names?

2003-11-14 Thread Charles K. Clarkson
Douglas Houston [mailto:[EMAIL PROTECTED] : : WHY do I need to explain why I want to do this? Because no one wants to give a loaded gun to someone who hasn't demonstrated a good grasp of gun safety. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home

RE: Counting (easy!) (YES!!)

2003-11-12 Thread Charles K. Clarkson
; print $i\n; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Where is editor that will Indent my perl code?

2003-11-04 Thread Charles K. Clarkson
henq [EMAIL PROTECTED] wrote: : HTML-Kit has color highlighting and a perl-tidy plugin. : Give it a look. FTP is nicely integrated. So does UltraEdit (UltraEdit.com). Ian is always updating and perl-tidy is very customizable. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: Face lift survey

2003-11-01 Thread Charles K. Clarkson
. The same applies to my answers. Not to mine, Bucko! I am always right and disagreeing with me will lead to dire consequences. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED

RE: Use of uninitialized value

2003-10-28 Thread Charles K. Clarkson
: @slice = @numbers[ $number[ 1 ],$number[ 11 ] .. $number[ 11 ] + 4 ] -- [arrows added] HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e

RE: how to pass multi array as args

2003-10-26 Thread Charles K. Clarkson
= [ [ '1 2 3' ], [ 'a b c' ], [ 'aa ab ac' ] ]; See the difference? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: how to pass multi array as args

2003-10-26 Thread Charles K. Clarkson
, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 BTW, I used @x, @y, @z because $a and $b are special. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Array Reference Practice Help

2003-10-26 Thread Charles K. Clarkson
decided to avoid using prototypes. Just my $.03 (I'm a big spender), Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: how to pass multi array as args

2003-10-25 Thread Charles K. Clarkson
@a = ? #arg1 an array $_[0] is not working : my @b = ? arg2 another array $_[1] is not working : my @c = ? arg3 another array $_[2] is not working : } sub mysub { my( $x, $y, $z ) = @_; . . . } HTH, Charles K. Clarkson -- Head Bottle

RE: Perl Script in Tables

2003-10-23 Thread Charles K. Clarkson
distribution, has some excellent examples. You can also read Ovid's course on programming with CGI.pm: http://users.easystreet.com/ovid/cgi_course/ HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e

RE: Perl Script in Tables

2003-10-23 Thread Charles K. Clarkson
( [ td( { -width = '20%' }, $_[0] ), td( { -width = '80%' }, $_[1] ), ]); } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

RE: cgi script not workingI

2003-10-23 Thread Charles K. Clarkson
command line, install perl locally on your own computer. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Parsing pipe delimited file

2003-10-22 Thread Charles K. Clarkson
Kevin Pfeiffer [EMAIL PROTECTED] wrote: : Where I am stuck is on the question: : : Given an @array such as : (Title of Song, Artist, Title, Another Artist, etc), : is there an easy way to strip out the quotation marks. s///g foreach @array; HTH, Charles K. Clarkson -- Head Bottle

RE: Persistant Filehandles.

2003-10-17 Thread Charles K. Clarkson
{ open $curFile, $0 or warn Could not open $0: $!; } sub slide_ { close $curFile; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: problem with date routine

2003-10-02 Thread Charles K. Clarkson
constant DATE_FORMAT = '%m%d%y'; . . . my $yesterday = strftime DATE_FORMAT, localtime $^T - 86400; my $today = strftime DATE_FORMAT, localtime $^T; printf Today: %10s\nYesterday: %4s\n, $today, $yesterday; HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: guestbook mySQL / PERL

2003-09-24 Thread Charles K. Clarkson
choose, stick to it. And try not to abbreviate When you need help later on, it might be someone who doesn't use English as a first language trying to help. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail

RE: Getting started in Perl for Windows

2003-09-24 Thread Charles K. Clarkson
: background - is that it? If so, what's next? It sounds like you may have installed Activestate perl. If you installed it in the C:\Perl directory, try pasting this link into a browser window to get to the documentation on your computer. file:///C:/Perl/html/index.html HTH, Charles K

RE: One Time Only Code in Sub

2003-09-24 Thread Charles K. Clarkson
; } } __END__ You can read more on this topic in 'perlsub' in the Persistent Private Variables section. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

RE: Printing Arrays

2003-09-22 Thread Charles K. Clarkson
it to : : for ($i=0;$i4;$i++) { : print FILE @arr$i\n; : } How about: use strict; use warnings; my $filename = 'blah'; # always check to see if open succeeded open FH, $filename or die Cannot open $filename: $!; print FH @[EMAIL PROTECTED]@arr3\n; close FH; __END__ HTH, Charles K. Clarkson -- Head

RE: list-parsing problem

2003-09-18 Thread Charles K. Clarkson
kind of sort order? Or does order matter? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: list-parsing problem

2003-09-18 Thread Charles K. Clarkson
that the first column would always be numeric. You didn't state it for the second column either. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Split based on length

2003-09-17 Thread Charles K. Clarkson
::Dumper; use POSIX 'ceil'; print Dumper fixed_split( 6, '12345678' ); sub fixed_split { return [ unpack A$_[0] x ceil( ( length $_[1] ) / $_[0] ), $_[1] ]; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e

RE: Browser wants to do a file download on a CGI script

2003-09-13 Thread Charles K. Clarkson
other cgi scripts run okay? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Browser wants to do a file download on a CGI script

2003-09-13 Thread Charles K. Clarkson
to see the code to provide assistance. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: File existence under Microsoft IIS

2003-09-06 Thread Charles K. Clarkson
root: $filename = '/images/file.jpg'; if ( exists( $filename ) ) { # # Do something with $filename # } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

RE: Equivalent of GetVersionInfo ()

2003-09-05 Thread Charles K. Clarkson
Shishir Saxena [EMAIL PROTECTED] wrote: : Is there a way to get the information returned by the VC++ fn : GetVersionInfo(); thru any of the perl structures / commands? What does GetVersionInfo() return? Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home

RE: Help please. What is missing?

2003-09-04 Thread Charles K. Clarkson
line 13 near 1c Chances are that 1c is a typo and should be lc the perl lowercase function. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: cutting a string

2003-09-03 Thread Charles K. Clarkson
: print strip_to_end( '/', 'C:/test/me' ), \n; sub strip_to_end { my( $seperator, $string ) = @_; return ( split $seperator, $string )[-1] } Then, if we find a faster method (like 'substr') we can change the method without effecting the rest of the program. HTH, Charles K. Clarkson

RE: how to read?

2003-08-18 Thread Charles K. Clarkson
it a strange way to write an array. Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: :Application

2003-08-14 Thread Charles K. Clarkson
programmers. I used perl for more than a year as a utility. I didn't do any multiple screen apps until just recently. C::A is also OO and that is a turn off for many. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: Active Perl and cgi-bin problem

2003-08-14 Thread Charles K. Clarkson
/cgi.html HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Quick export question

2003-08-14 Thread Charles K. Clarkson
%symbol_table = %::; delete @symbol_table{ @previous_keys }; return [ keys %symbol_table ]; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

RE: arrays

2003-08-04 Thread Charles K. Clarkson
] ); print Dumper [EMAIL PROTECTED]; sub concat_array { my( $string, $array_ref ) = @_; @$array_ref = map $_$string, @$array_ref; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED

RE: Regarding fontface infromation

2003-07-28 Thread Charles K. Clarkson
? : For example in the below tag font face=Arial, : i want to get Arial in my output. You want to get Arial in your output of what? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL

RE: Thumb-nailing Pic's

2003-07-26 Thread Charles K. Clarkson
on automating the process is at: http://www.stonehenge.com/merlyn/WebTechniques/col29.html HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: HTH

2003-07-24 Thread Charles K. Clarkson
Jeff Westman [EMAIL PROTECTED] wrote: : : Okay guys, what does this mean? Several of you 'sign' with this. : : HTH Last week when the blower went out on the central A/C, it meant Hotter Than Hell. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home

RE: eleminating dupes in @list

2003-07-24 Thread Charles K. Clarkson
= eigenstates( any( @not_unique ) ); print Dumper [EMAIL PROTECTED]; One advantage is that this method is it will run instantaneously on a quantum computer. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: meta refresh - PERL - IE

2003-07-23 Thread Charles K. Clarkson
..' ), $q-end_html(); If you're not hung up on the Thinking. . . message, you could redirect the page from the header. The browser will use its own message. print $q-redirect('http://www.mysite.com/feature.html'); HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy

RE: Colorize Table Elements

2003-07-23 Thread Charles K. Clarkson
)$/, values %condorhash; HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: subroutines

2003-07-22 Thread Charles K. Clarkson
to a # full blown report print Dumper \%fouls_count; sub line_report { return sprintf Player's Name: %s\n . \tType of foul committed: %s\n, @_; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328

RE: subroutines

2003-07-22 Thread Charles K. Clarkson
: (\w+)/ ) { # $1 = player, $2 = foul type print line_report( $1, $2 ); # count fouls $fouls_count++; } } close STATS; print \nTotal fouls: $fouls_count\n; HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc

RE: writing to file

2003-07-21 Thread Charles K. Clarkson
the same no overwrite. Wrong. the original file has 5 lines and e is the fifth line. The new file has 6 lines and e is the sixth line. Line 5 has been overwritten with x. Why not tell us what you really want instead of these letters? HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson

RE: Thank for helping: Variable $q will not stay shared at

2003-07-20 Thread Charles K. Clarkson
B. Fongo [EMAIL PROTECTED] wrote: : : Now my codes looks like. It works. [snip] You might take a look at CGI::Application which handles a lot of the structure of a script for you. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968

<    2   3   4   5   6   7   8   >