Re: Chomp to trim '\r'

2003-10-08 Thread Carl Jolley
ways that are more-or-less equivalent and then there are ways that only a veteran of several obfuscated perl contests could appreciate. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl

Re: Array question

2003-10-07 Thread Carl Jolley
] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: array of anon. hashes sorting

2003-10-07 Thread Carl Jolley
of the hash. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: How to skip unwanted columns in CSV file?

2003-10-06 Thread Carl Jolley
column. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: How to skip unwanted columns in CSV file?

2003-10-06 Thread Carl Jolley
to maintain your code. Unnecessary fancy is rarely appreciated by other than the party of the first part OTOH, simplistic elegance is widely admired. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

RE: Perl and MS Publisher

2003-10-06 Thread Carl Jolley
didn't build Publisher around a COM (i.e. OLE) interface. You could always just use the OLE Browser program that is included in all semi-recent versions of perl and scan all your installed OLE interfaces/Controls to see if Publisher is among them. [EMAIL PROTECTED] Carl Jolley All opinions

Re: Date manipulation in Perl

2003-09-26 Thread Carl Jolley
::35 Difference : 0 init_time : 17-jul-03:07::41 final time : 17-jul-03:08::33 Difference : 0 You got those results due to the leading numeric portion of the strings. If you want to do date arithmetic then one solution is to use either Date::Calc or Date::Manip modules. [EMAIL PROTECTED] Carl

Re: Array question

2003-09-26 Thread Carl Jolley
problems than it solves. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Array question

2003-09-26 Thread Carl Jolley
function can add or delete one or more elements to the start, end, or at any arbitrary point in an array. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL

RE: Regular Expression problem?

2003-09-26 Thread Carl Jolley
the match to work correctly. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Array question

2003-09-26 Thread Carl Jolley
On Fri, 26 Sep 2003 [EMAIL PROTECTED] wrote: Hai, can any one tell how to pick up a particular pattern of files into that array... Eg:- files with extension .pl or .cfg @selected=grep{ /\.(?:pl|cfg)$/ } *.*; [EMAIL PROTECTED] Carl Jolley All opinions are my own

Re: newbie hlelp!

2003-09-18 Thread Carl Jolley
PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: win32::ODBC insert error

2003-09-18 Thread Carl Jolley
= ;} $prox-Close(); All your '\' strings need to be changed to '\\'. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Reg Expression missing last char?

2003-09-18 Thread Carl Jolley
} field. It had to be otherwise the match would have failed. The empty string following the last real character then allowed the (.*) to also match. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: OT: Regex humor

2003-09-18 Thread Carl Jolley
many hits on this filter, but finally did this morning: I find that using [^a-z]+ as a letter seperator is more effective, especially when spammers use such text as V~ I~ A~ G~ R~ A [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: newbie hlelp!

2003-09-16 Thread Carl Jolley
getting this date? stat should be fine : my $mtime = (stat $path)[9]; And then to convert the $mtime to something useful, give it to localtime(), e.g. @date_fields=localtime($mtime); OR $The_last_mod_time=scalar localtime($mtime); [EMAIL PROTECTED] Carl Jolley All opinions are my

Re: newbie hlelp!

2003-09-16 Thread Carl Jolley
,$mon,$dom); } That's probably because the files in @allfiles are not in your current directory. Either prepend the directory to the front of each file you stat or chdir to the directory. [EMAIL PROTECTED] Carl Jolley All opinions are my own

RE: Mail::Sendmail module problem?

2003-09-15 Thread Carl Jolley
is not the issue, the requirement is that it be in the current directory. If you cd'ed to the script's folder then you should be OK but if you did something like: perl scriptfolder\\script.pl then it won't be. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my

Re: Use of uninitialized value in concatenation (.) or string at...

2003-09-07 Thread Carl Jolley
was invented for. Otherwise if you don't want to use the quoting functions then at least do: = '' . $artist[$counter][0] . '' . ;\n; However, that too will produce a run-time error unless $artist[$counter][0] is defined and not null. [EMAIL PROTECTED] Carl Jolley All opinions are my

Re: How can I write in perl: #ifdef __GNUC?

2003-09-04 Thread Carl Jolley
is that all 'use' statement get performed at compile time therefore whether or not one executes a use statement can't be conditional. But a require and a call of a package's EXPORT method can be conditional. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those

Re: Illegal octal digit '9' problem??

2003-09-02 Thread Carl Jolley
as a decimal number. You would have probably gotten really frustrated when you suddenly found the value 8 amoung your data. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users

Re: Regex Help Needed

2003-09-02 Thread Carl Jolley
something like: sub matched{ return $mystring=~/^-{1,2}[mevgn]*/; } I, personally would think that just using the match directly in an if statement would be cleaner, e.g. if($mystring=~/^-{1,2}[mevgn]*/) { . [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily

Re: Illegal octal digit '9' problem??

2003-09-02 Thread Carl Jolley
) for use as the hash keys and, of course on any value used to index a hash key/value. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: Perl newb

2003-08-29 Thread Carl Jolley
the the original coder wanted to match the 0 length string after the first character and before the last character in the string ''. A better pattern all around would be ([^]+). [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: stopping a running process

2003-08-29 Thread Carl Jolley
of the current year. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: WMI wierdness.

2003-08-29 Thread Carl Jolley
mins, $dsec secs; # For testing purposes only. #dref(0,\%os_info); #exit; } return (%os_info); } -Original Message- From: Carl Jolley [mailto:[EMAIL PROTECTED] Sent: Thursday, August 28, 2003 4:15 PM To: Jim Lancaster Cc: [EMAIL PROTECTED

Re: unlink doesn't

2003-08-29 Thread Carl Jolley
that changing your unlink code may do the trick, e.g. unline $logdir/$file; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Command line options question

2003-08-27 Thread Carl Jolley
perl -p -i.bak -e s/PNRef(.*)\/PNRef/$1/g result_sale.tmp jiri.txt Does not work Any ideas? Instead try: perl -n -e print $1 if /PNRef(.*)\/PNRefs result_sale.tmp jiri.txt [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Invoke perl script from CGI and redirect STDOUT, STDERR to afile

2003-08-27 Thread Carl Jolley
script called by the web server. You should not mess with the STDOUT filehandle usless you use it to send output back to the browser. I suggest you use system() to call the embedded scripts. Use of backquotes messes with STDOUT. [EMAIL PROTECTED] Carl Jolley All opinions are my own

RE: How to execute a command under win98 via perl script?

2003-08-27 Thread Carl Jolley
On Wed, 27 Aug 2003, Wenjie Wang wrote: system copy c:\a.txt d:\a.txt; This won't work due to unescaped backslashes in a double quoted string. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Obtaining a perl hash id in a call back function.

2003-08-27 Thread Carl Jolley
method for the object. If you simply want to release all win_list objects at the time you exit your script then code in an END block could perform this function. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: How to execute a command under win98 via perl script?

2003-08-27 Thread Carl Jolley
quotes. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Win32: does anyone know how to fork a process ?

2003-08-25 Thread Carl Jolley
anyone know how to start a process, on a Win32 platform without hanging the perl process (like system) or never returning (like exec) ? I thing you should use single quotes for $ProcExe or if you want or need to use double quotes, escape the backslases with backslashes. [EMAIL PROTECTED] Carl

RE: about use...

2003-08-24 Thread Carl Jolley
On Sun, 24 Aug 2003, [iso-8859-9] [e]agLØrT wrote: hi.. just got, i can change the options with CHMOD. so, the script will be not executed and not read, can't i? Sure, but what use is a write-only script? Perl has to read it to interpret it. [EMAIL PROTECTED] Carl Jolley All

Re: Help with snippet

2003-08-21 Thread Carl Jolley
two nested loops as: foreach $key (sort keys %allhash) { ... ... ... } [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: Need advice on obtaining MAC addresses...

2003-08-21 Thread Carl Jolley
then the appropriate way with a web server is to require the user to enter a password and do basic authenication. Note they will only have to enter the password the first time they access the page in their current browser session. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily

Re: NEED DEVICE : ftp disconnect

2003-08-21 Thread Carl Jolley
is less than or equal to 10 bytes. If that is the aways the case, then you don't need a loop to read/write more than one time. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32

Re: reg exp seems to fail on stripping http headers under perl 806

2003-08-21 Thread Carl Jolley
with: Content-Type: text/html. If on the other hand you are trying to strip off all the header information up through the end-of-headers then an appropriate substiturion operator would be: $got_gif=~s/^.*\n\n/s; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily

RE: Slow file reading...

2003-08-20 Thread Carl Jolley
the elapsed time to complete the memory allocation. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Slow file reading...

2003-08-20 Thread Carl Jolley
to be reference only once, when you read the whole file into it. And as an aside, what does the code: $st-bind_param(2, ARKIV); accomplish when the state of the ARKIV filehandle at that point is open and at eof()? [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily

Re: CPAN Module UNIX Windows newline character

2003-08-18 Thread Carl Jolley
the ending of that line. Or, for that matter why you would want to replace the \r with \r\n unless you were trying to create a double spaced version of the file. I suspect you were intending to instead do: s/\r?\n/\r\n/; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily

Re: Thoritical limits on perl processes

2003-08-18 Thread Carl Jolley
instead of reading all of them at once. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com

Re: What is wrong with this?

2003-08-14 Thread Carl Jolley
them. Note that each number with a problem is the the last one on its line, i.e. you are not using 27 you are using the value of 27\n. Note for example in your output 27 occurs twice. This is not possible for a hash key. But you have two separate hash keys, 27 and 27\n. [EMAIL PROTECTED] Carl

Re: CGI Error

2003-07-26 Thread Carl Jolley
of $sender=new Mail::Sender. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Rename does not work with Windows

2003-07-25 Thread Carl Jolley
In the absence of any code my guess would be something to do with premissions. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: Archive::Zip

2003-07-25 Thread Carl Jolley
help me! The path does control where perl looks for libraries except that the current directory is always searched for libraries. It sounds like you need to look at the 'use lib' pragma. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Page generation tweeking

2003-07-23 Thread Carl Jolley
. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Reading EXCEL Sheet question

2003-07-21 Thread Carl Jolley
defining an END block with your close of excel code there. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Problem reading directory in perl via IIS

2003-07-21 Thread Carl Jolley
are running under IIS, what is your cd set to? Try explicitly setting the cd to an absolute path via the chdir function. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users

RE: regular expression on military time

2003-07-21 Thread Carl Jolley
On Fri, 18 Jul 2003, Ted S. wrote: On 18 Jul 2003, Carl Jolley wrote in perl: On Thu, 17 Jul 2003, Ted S. wrote: On 17 Jul 2003, Tobias Hoellrich wrote in perl: my @t=(08:00, 23:59, 00:00, aa:00, 24:00, 00:01, 8:00, 08.00, 36:12, 08:61 ); foreach(@t) { unless(/^(\d{2}):(\d{2

Re: Get time and date for 2 weeks at a time

2003-07-16 Thread Carl Jolley
() and then in your loop, increment it by 24*3600 before using it as a parameter to localtime. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: More confused Re: Resetting $1 when no-match

2003-07-15 Thread Carl Jolley
unexpectedly (outside the problems that I have because I run it under an inferior O/S). Thanks again, LarryD Note that (\s*[0-9]*) matches the null string. Try again with (\s*[0-9]+). [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Error trapping

2003-07-15 Thread Carl Jolley
before actually die'ing? Have you tried to define a $SIG{DIE} subroutine? [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe

Re: Foreach question.

2003-07-11 Thread Carl Jolley
a single line, e.g. while(FH) { and then when you find a match you can do: $second_line=FH; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: Excel and empty rows.

2003-07-11 Thread Carl Jolley
; } [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Excel, hyperlinks and empty rows.

2003-07-10 Thread Carl Jolley
-{PrintArea};) then by use of a regex you can tretieve the value of the last row. You can't then bump the row value by one so the print area contains the new row. Then you can add your info to the new row. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my

Re: This is what confuses me about my...

2003-07-10 Thread Carl Jolley
doing this... but that works? Have you considered the use vars pragma? [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: case insensitive index() ?

2003-07-08 Thread Carl Jolley
and also lower case a copy of the content and do your index on the copy. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

RE: Easy Reg-Ex

2003-07-07 Thread Carl Jolley
not _require_ escaping. Of course any character CAN be escaped. So the ! will work in either case. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED

Re: Easy Reg-Ex

2003-07-07 Thread Carl Jolley
On Fri, 4 Jul 2003, M Ajmal wrote: Hi, I'm parsing a file and want to eliminate all lines that start with Test and end with PASS!. I'm trying to do the following: /^Test.+PASS!$/ but it says no patterns match! Some help please. Show more code, please. [EMAIL PROTECTED] Carl

Re: Help needed: String 'C++' was treated as Nested quantifiers

2003-07-07 Thread Carl Jolley
in your data: print Got you.\n if 'ABC' =~ /\Q$myLine\E/i; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: how to speed up my program?

2003-07-03 Thread Carl Jolley
ways to make your code run faster on your current computer. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Perl Formats

2003-06-27 Thread Carl Jolley
=' ' if $seen{$rfamily}++; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: out of memory problem!

2003-06-25 Thread Carl Jolley
? Anyone know how to solve this problem, please help me. My WAG is that your problem is with your code but since you didn't show any code, its difficult to say for sure. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Trouble counting chars

2003-06-18 Thread Carl Jolley
=~ tr/$perm//; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Reverse of Chomp..(regarding not chomping)

2003-06-14 Thread Carl Jolley
. The terminal $ in a regex will match either the end of the string OR the \n at the end of a string. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL

RE: Help needed -- Net::telnet gives errors

2003-06-14 Thread Carl Jolley
? [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: easy newbie REGEX

2003-06-12 Thread Carl Jolley
Jolley All opinions are my own and not necessarily those of my employer I'd do it like this: while($answer !~ /^MSD\d$/) { print ask for answer\n; chomp($answer=STDIN); } [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: -d file test under WinXP Pro?

2003-06-12 Thread Carl Jolley
some code. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Win32::OLE and Excel Sorting

2003-06-12 Thread Carl Jolley
= xlDescending, Key3 = $SortOrd3, Order3 = xlAscending, }); /code Yhe OP's code was missing: use Win32::OLE::Const 'Microsoft Excel'; And yet he used the xl... constants. for descedning, etc. [EMAIL PROTECTED] Carl Jolley All

Re: Use of split function...

2003-06-10 Thread Carl Jolley
I should use something like this: @list= split (' ', $file), but it doesn't work, it returns file name only... So, could someone help me? After: @list=FILE do: foreach (@list) { chomp; $_=(split(/ /,$_))[3]; } [EMAIL PROTECTED] Carl Jolley All opinions are my own

RE: Can't locate Cisco.pm in @INC...again

2003-06-10 Thread Carl Jolley
again for helping me. Could it possibly be that perlscript doesn't run on the server? If perlscript isn't installed on the client, it won't work. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Single quotes on the command line

2003-05-31 Thread Carl Jolley
character can be used to delimit text. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman

Re: Daemonizing a perl application

2003-05-31 Thread Carl Jolley
it and also provides a hook into it. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Global substitution

2003-05-31 Thread Carl Jolley
PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Global substitution

2003-05-31 Thread Carl Jolley
. Another way of dealing with a file that has br instead of linefeeds is to do: $\=br before the file is opened, however that won't work if any BR tags are used. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Global substitution

2003-05-31 Thread Carl Jolley
=~s/br/\n/gi; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Chopping out 5 Digits At the end of a string

2003-03-28 Thread Carl Jolley
with a $ regex metacharacter, would. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com

Re: Another regular expression question

2003-03-20 Thread Carl Jolley
: ($extension)=$path=~/\.(\w{3})$/; If the extention can be of arbirtrary length then you could use ($extension)=$path=~/\.(\w+)$/; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl

Re: Problem with Net::FTP

2003-03-19 Thread Carl Jolley
in advance Check your capitalization carefully. It's 'use' and Net::FTP. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe

Re: Results per page

2003-03-14 Thread Carl Jolley
send a hidden form field with a page-number value. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

Re: Parsing test file question

2003-03-14 Thread Carl Jolley
PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: How do I edit the tab of an Excel worksheet?

2003-03-14 Thread Carl Jolley
its name. $Sheet-{Name}=$label; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman

Re: Regular Expression matching problem

2003-03-14 Thread Carl Jolley
are only checking for one instance of your regex per input line. I suggest you change your code from an 'if' to: while(/wilma\b/g) { You should get 6 matches on your input file not seven. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Not matching a dot

2003-03-14 Thread Carl Jolley
could try: if($file !~ /\./) or better yet try: print file $file has no dot\n unless $file=~tr/././; [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL

Re: environment variable issues

2003-03-14 Thread Carl Jolley
, by this i mean that it actually exists on a server?? Just use: $ENV{REQUEST_METHOD} The CGI module isn't used to retrieve enviromental variables. The environmental variables are in the %ENV hash. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my

Re: Simple syntax question

2003-03-14 Thread Carl Jolley
that the hash assignment is done only when the regex matches. However the regex is pretty sloppy. Note tbe following lines all will match: ?,* , , #,# screwed,eval {`format drive C: \\V:x \\U`} [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer

Re: Adding a WorkSheet to Excel using Win32::OLE

2003-03-14 Thread Carl Jolley
me out please? Try this: $Sheet=$book-WorkSheets-Add; $_=$book-WorkSheets-{Count}; $Sheet-Move(After=$book-WorkSheets{$_}); [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32

Re: CALLED

2003-02-27 Thread Carl Jolley
, you could call log_debug like: log_debug(start, number of param = , scalar(@param)); and the code in log_debug might look like: sub log_debug{ my($info)=(caller)[3] . . $_[0] . $[1] . \n; .. .. } [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those

Re: Newbie Question

2003-02-10 Thread Carl Jolley
then their names could be provided as multiple arguments via the @ARGV array. Once the set of file names are provided the loop could open, read each one and create a corresponing output file for each file that it changes. [EMAIL PROTECTED] Carl Jolley All opinions are my own

Re: Regex question

2003-02-06 Thread Carl Jolley
]\d{4}|104[0-7]\d{3}| [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman

Re: Regex question

2003-02-06 Thread Carl Jolley
a value of = 0. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Search a free Perl debugger

2003-02-04 Thread Carl Jolley
it. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: determining if a scalar is an integer or not

2003-02-04 Thread Carl Jolley
On Fri, 31 Jan 2003, Andreas.Kamentz wrote: I'd like to supplement the suggestions that came from all sides with a little subroutine which always worked for me determining whether the scalar is a number (not only integer) and returning the number if it is one. Once having the $res number

Re: What's wrong with this?

2003-02-04 Thread Carl Jolley
$Key. Recall that the items in a hash are simply the key/value pairs. When you are printing out the items in the hash you are simply printing the first key, first value, second key, second value, etc.. The fact that you named the iteration variable $Key means nothing. [EMAIL PROTECTED] Carl

Re: is it a binary file?

2003-01-30 Thread Carl Jolley
that it is a unformatted text document. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman

Re: string compare

2003-01-30 Thread Carl Jolley
match with the i flag then either use the uc or lc functions on both items, e.g. if (lc($m1) eq lc($t1)) { [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL

Re: sort a table

2003-01-30 Thread Carl Jolley
the appropriate syntax in whith each is used. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman

Re: determining if a scalar is an integer or not

2003-01-30 Thread Carl Jolley
your code when ($var = 0). I think you may be suprised to discover that the number 0 is a string rather than an integer. [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer k ___ Perl-Win32-Users

Re: determining if a scalar is an integer or not

2003-01-30 Thread Carl Jolley
as being an integer :-) But 0 will be reported to be a string! [EMAIL PROTECTED] Carl Jolley All opinions are my own and not necessarily those of my employer ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http

  1   2   3   4   >