RE: Okay, hand me my dunce-cap

155) { >$cs_keys{$key} =~ s{/Zones/}{/Lockdown_Zones/} > } > > I just got hung up on using the map line... Perhaps I am missing something, but sequential numeric keys suggest array rather than hash to me. HTH -- Brian Raven Please consider the environment before printing this e-mail.

RE: trouble understanding/using file handle in a sub routine

tter to assign the parameters to local variables with appropriate names, rather than relying on a comment. For example... sub write_fp_data { my $file_pointer = shift; my $data_value = shift; print $file_pointer $data_value; } HTH -- Brian Raven Please consider the environment b

RE: Is there a range of Standard Perl Exit Codes?

e output the >error message, that is. However, I would be careful about doing this as there >could be some odd side effects, depending on how the modules that you use >behave. It might be worth looking for alternate method of achieving your desired result, which isn't entirely clea

RE: Need help with TK DirTree

Not the first time a question like this has been asked. Take a look at this link, which may point you in a useful direction. http://www.perlmonks.org/?node_id=170334 -- Brian Raven From: perl-win32-users-boun...@listserv.activestate.com [mailto:perl-win32-users-boun

RE: In need to efficiently retrieve HTTP

re the OP downloading from google maps, for example, he might find that they don't like the idea of anybody downloading a lot of files in a short period (see https://developers.google.com/maps/faq#usagelimits). HTH -- Brian Raven Please consider the en

RE: How to know a closed Socket?

data because I am broken" is to use a heartbeat mechanism, i.e. a sender will send a heartbeat message at regular intervals, that can be checked by the receiver. Welcome to network programming. HTH -- Brian Raven Please consider the environment before pri

RE: 'mysplit' ???

oogled' the word 'mysplit' and find no results. > > might anyone know exactly what 'mysplit' is? I may have misunderstood your question, but mysplit is the sub defined above (see ^^^). HTH -- Brian Raven Please consider the en

perl-win32-users@listserv.activestate.com

; > } > sub2(\&subroutine); > sub sub2 { > &sub3 = &{$_[0]}; #problem is obviously here with this line, seems its not > being dereference > sub3('world'); The only variable types are scalar array and hash. There is no subroutine variable type, but you can

RE: button with multiple font sizes

Dan, Tk::Button only allows for text in a single font, as you have probably discovered. However, it does let you use an image. If you can render the text you want as an image (e.g. GD?), that that might be a way to go. HTH -- Brian Raven From: perl-win32-users-boun

RE: confused by use of 'implied' variable

; yes, i know i can simply try it, to see if it works - but is there a more > general rule one can follow that > tells them when this kind of thing can normally be used, versus when not? Start with 'perldoc perlvar'. It is the first one listed under General Variables. HTH -- Brian

RE: help dbd-anydata / dbi-dbd-sqlengine issue

57109_20130514.dat"; > > #my ($file, $flags, $dbh) = @_; > > # define data source > # $dbh->func('CRU_in', 'CSV', $file, $flags, 'ad_catalog'); > $dbh->func('CRU_in', 'Pipe', $file, $flags, 'ad_catalog'); > > #

RE: :SMTP::Server and blocking

{ my @fds = $sel->can_read($time_limit); if (@fds > 0) { my $client = new Net::SMTP::Server::Client($fds[0]->accept()); ... etc. } } HTH -- Brian Raven = Atos Euronext Market Solutions Disclaimer

RE: command line debugger and activestate perl-5.10

ile that overrides the default config (see 'Configurable Options' in 'perldoc perldebug')? HTH -- Brian Raven = Atos Euronext Market Solutions Disclaimer = The information contained in this e-

RE: Perl tree data & HTML

=> ['C2']}; print start_html; print head("Test"); print dump_ref($ref); print end_html; sub dump_ref { my $r = shift; if (ref($r) eq 'HASH') { return ul(map {li($_), dump_ref($r->{$_})} sort keys %$r)

RE: Perl tree data & HTML

Chris Wagner <mailto:[EMAIL PROTECTED]> wrote: > At 12:58 PM 4/9/2008 +0100, Brian Raven wrote: >> use CGI::Pretty qw{:standard}; > > > I'ld be cautious about using CGI::Pretty. I've had it randomly > mangle output. It would chop the final character of

RE: please suggest win32 equivalent module to convert windows scripts tolinux

d have designed your scripts to be as platform independent as possible (see 'perldoc perlport' for tips). HTH -- Brian Raven = Atos Euronext Market Solutions Disclaimer = The information contained

RE: Request help in compilation of IO::Tty module

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Udaya K (udk) Sent: 14 May 2008 19:21 To: Jan Dubois; perl-win32-users@listserv.ActiveState.com Cc: Sowmya B S (sowbs) Subject: RE: Request help in compilation of IO::Tty module > Hi Jan, > Thank you for your valuable inputs. > > I

RE: How to change dir using SFTP or SSH

ur path was rejected, but it is likely to be one of those. I could be wrong, but I don't think that being able to chdir (which I don't think you can) would make any difference. As this is a win32 list, don't forget that unix file systems are usually case sensitive, unlike win32. HTH

RE: How to change dir using SFTP or SSH

eate an SSH connection (I'm assuming that is what mean by $ssh) without a remote shell. If the problem isn't with your code, then I can't really think of anything else to suggest other than fix the remote end. HTH -- Brian Raven = Atos Eurone

RE: UInt32 cast as SInt32

nstead of an unsigned integer (i.e. UInt32). Is there a way to tell Perl to cast the variable as UInt32? > > The platform is Windows Server 2003 Standard Edition, SP2, running ActivePerl v5.8.8.822. Could you please post a small, self-contained script that demonstrates

RE: :Notify Troubles

es authentication, if so you will need to supply the relevant parameters, as well as installing Net::SMTP_auth. HTH -- Brian Raven = Atos Euronext Market Solutions Disclaimer = The information contained

RE: Track mouse position

workstation OS is XP Pro if it makes any difference. No difference as far as I can see. Apologies for the flippant response, which is due in some part to it being late on Friday afternoon where I am. HTH, HAND. -- Brian Raven = Atos Euronext Market Solut

RE: Unable to find Date::Calc in the ActiveState Package Repository

ate.com/BuildStatus/5.10-windows/windows-5.10/Date-Ca lc-5.4.txt for why it isn't in the win32 archive. It seems to be in the Bribes archive, however. Get PPM::Repositories for the location. HTH -- Brian Raven = Atos Euronex

RE: Problem with Win32::ToolHelp module

s changed, or perhaps any library that it depends on? You can also get more detailed info on diagnostic messages like that from 'perldoc perldiag'. HTH -- Brian Raven = Atos Euronext Market Solutions Disclaimer =

RE: problem with print

;sophisticated' alternative to ".", that I sometimes use. print "Doing some more stuff "; my $i = 0; for (1..20) { local $| = 1; select undef, undef, undef, 0.5; print "\b" . qw{| / - \\}[$i++ % 4]; } print "\b \n"; HTH -- Brian Raven Vi

RE: WIN32::OLE help

tion, under the help menu. Another damned useful tool is the OLE browser kindly provided with the Activestate documentation. I found the constant names mentioned above in both. HTH -- Brian Raven Visit our website at http://www.nyse.com Not

RE: Referenced data changing

alias for each entry in the array being iterated over. That means that if you change $val, you also change the original array entry. This behaviour is documented in 'perldoc perlsyn', under 'foreach'. If you don't want that to happen, you must copy the value before changing

RE: Run perl on window using cygwin+Eclipse+EPIC

obably needs to be changed > into a location that windows can make sense of. > > Sorry - I don't know what eclipse is. I know what it is, but that is about my limit. HTH -- Brian Raven --

RE: problem with Komodo

HeadHuntYourNextJob.com:Three Search Engines. Lots of Jobs! *HeadHuntYourNextJob.com *lets you find opportunities that fit your experience--no matter what that experience is--anywhere in the world. We provide you with several search engines to provide the deep

RE: Shared memory

eed to install it first though, as it isn't part of the standard distro). HTH -- Brian Raven --- This e-mail may contain confidential and/or privileged information. If you are not the inte

RE: Re[2]: info on Perl IDE and debugger in WindowsXP

.perlmonks.org/?node_id=639314 Personally I just use an editor that I like (xemacs), and the command line debugger. HTH -- Brian Raven --- This e-mail may contain confidential and/or priv

RE: info on Perl IDE and debugger in WindowsXP

Angelos Karageorgiou <> wrote: > Brian Raven wrote: >> >> >> Personally I just use an editor that I like (xemacs), and the >> command line debugger. >> >> HTH >> > > > > Dunno about you , but I have found the syntax highlight

RE: PPM failures, help pls.

t it might be worth checking the integrity of any downloaded archive files. HTH -- Brian Raven --- This e-mail may contain confidential and/or privileged information. If you are not the

RE: file::spec splitpath problems

xample of correct usage of the splitpath function: could someone e provide one (or any > other pointer to what I'm doing wrong)? Also, perhaps you spotted in the doco for splitpath where it says "On systems with no concept of volume, returns '' for volume". That would

RE: file::spec splitpath problems

to provide a (mostly) platform independent interface to an underlying platform specific implementation. You might get better results if you used a more platform independent path string, for instance "/" is a valid path separator

RE: RegExp matching over multiple lines

x27;$1'\n"; } __DATA__ Case #1 Some text Number 1 Case #2 Some text Number 2 Case #3 Some text Number 3 -------- However, the best advice that can give is that regular expressions are not a good tool to parse HTML, but HTML::Parser is. Or better sti

RE: Reading hash arrays in the order it was written

keys %midtlinfo) > @mrec = split(/\|/,$midtlinfo{$mk}); > > > > } 1. Push keys into an array as you add them to the hash and use that instead of 'keys %hash', ... or ... 2

RE: AdminMisc and hard drive recognition

Win32 > _AdminMisc should be right between them, shouldn't it? Or am I looking up the wrong tree? I came across this one recently... http://letmegooglethatforyou.com/?q=WIn32%3A%3AAdminMisc ... well, it amused me for a few seconds. -- Brian Raven --

RE: Issue with Mail::Sender : "what is the << function called?"

don't my < ... To add to that useful info, it is actually an operator rather than a function, and is also described in 'perldoc perlop'. HTH -- Brian Raven --- This e-ma

RE: implied variables (what are they actually?)

e... The learning exercise will be more effective if you read the documentation for the syntax, operators and functions that want to you use. If you still have questions after a combination of reading the documentation, and trial and error, please ask in fora like this. HTH -- Brian Raven -

RE: Calling subroutine from different file

("perl file1.pl"); > system("perl file2.pl"); > > I hope there is a better way to do this. If it is then please help me. I'm not sure that I understand what you are asking. Unless it is feasible to put the code from file1.pl and fil

RE: :Socket (client program sends simple text file containing CRLFnewlines)

der Binary Files. If anyone knows of a better reference, please shout. It looks like you might want to binmode your input file handle. Or possibly chomp your input lines, and explicitly add CRLF when you send them to the socket. HTH -- Brian Raven

RE: Perl Login Script using CGI module

what you started, for example: print end_form; print end_html(); > > > > > It will be great if someone help to write the script. You need to do some more reading. Start wit

RE: Perl Login Script using CGI module

From: Perl Perl [mailto:perl.solut...@gmail.com] Sent: 17 March 2009 16:49 To: Brian Raven Cc: perl-win32-users@listserv.activestate.com Subject: Re: Perl Login Script using CGI module > Hi Brian, > Thanks a lot for your kind mail and in detail description. > Please find the t

RE: what is the most robust and accurate way to determine the BOOTvolume?

> $buflen) { die "GetSystemDirectory buffer needs to be at least $result bytes\n"; } print "System directory is ", substr($buf, 0, $result), "\n"; HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not

RE: Reset in ANSIColor sets the background to black

REEN|BACKGROUND_INTENSITY); # This sets the text color on DOS in red with intensity $console->Attr(FOREGROUND_RED|FOREGROUND_INTENSITY|$BackgroundColor); print "\nError Msg: $error \n"; $console->Attr($CurrentConsoleColor); } 1; HTH -- Brian Raven This e-mail may

RE: running a dos program from perl

em and can not get even close. I suggest taking a look at 'perldoc perlipc', as well as 'perldoc IPC::Open2' and 'perldoc IPC::Open3'. Installing IPC::Cmd and/or IPC::Run may help simplify things a bit. HTH -- Brian Raven This e-mail may contain confidential and/o

RE: active perl 5.8.8 build 820 inconsistent behavior with $input =;

the localised file handle. Or course, if you can install File::Slurp, you don't even need to write one. Also, its better to call subs without the '&' prefix, unless you know what that does, and you need it. HTH -- Brian Raven This e-mail may contain confidential

RE: :Socket question (client receive - when # of bytes to be receivedis NOT known in advance)

the socket is closed. For anything more fine grained than that, or it is your responsibility to close the socket, then you will need to know how to recognise when to start and stop reading from the socket, which depends on the protocol that is being used. It can also depend on what else you are

RE: expanding hash database

gt; root --> energy > \-> inorganic > > then adding a subroot to energy > add solar > root --> energy --> solar > \-> inorganic > > and then increasing expansion as needed. Have a look at 'perldoc perldsc' for starters. HTH -- Brian Rave

RE: use system() function

ontained example script, that we could simply cut&paste and run would be better, along with the output generated when you ran the same code. Also, what happens when you execute those commands manually? HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If

RE: use system() function

Min Jeon, > > Please use back stick operator here, instead of system command, because system command doesn't return > anything. Not so. From 'perldoc -f system': "The return value is the exit status of the program as returned by the "wait" call."

RE: Win32-TaskScheduler problem with remote systems

e > SetAccountInformation and SetTargetComputer functions added. > > Windows XP SP2 > Perl 5.8.8 822 [280952] > Win32-TaskScheduler 2.0.2 > > Any help would be greatly appreciated. This is just a guess, but the example script (http://cpansearch.perl.org/src/UNICOLET/Win32-Task

RE: LWP Help please

less vague. As LWP is mainly concerned with retrieving data, it is unlikely to be involved, as your question seems to be more related to doing something with the data after retrieving it. HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not t

RE: question about recursion

if anyone has any insights or experience with this, I would be very interested to learn from your experience Without more detail it is hard to say (some example code would be useful here). However, you should be able to use the return value from your recursive sub, rather than a global. HTH -- Bria

RE: Problem iwth perl tk : Creation of file based on options

es-0812/lib/x86_64-linux-thread-multi/Tk/Derived.pm line 306 > main::set_bg at Radio.pl line 26 > Tk::BackTrace at /apps/perl/modules-0812/lib/x86_64-linux-thread-multi/Tk.pm line 124 > Tk::Derived::configure at /apps/perl/modules-0812/lib/x86_64-linux-thread-multi/Tk/Derived.p

RE: Activeperl 5.10 + thread + join = random crashes

my $id = $thr->tid(); print "Result for thread $id is $result\n"; } select undef, undef, undef, 0.1; } print "All threads finished\n"; } sub threadsub { my $id = threads->tid(); print "Thread $id starting\n"; m

RE: Activeperl 5.10 + thread + join = random crashes

tack. You are aware that Tk is not thread safe? Of course that may not be your problem, but it is a pretty good candidate. In fact Tk can be used in a threaded Perl program, but it must be done with great care. HTH -- Brian Raven This e-mail may contain confidential and/or privileged informati

RE: Advice requested, porting unix perl app to windows

d schedule, and I've been searching CPAN. But before heading > too far down that path, I thought I'd ask the list for advice. There are command line tools in cygwin and putty. There are also perl modules, e.g. Net::SSH2. HTH -- Brian Raven This e-mail may contain confidentia

RE: inserting the file paths in between the two arrays ( text widget ) : Perl/TK

to append the $path to the array. In which case see 'perldoc -f push'. > #open (FILE,">>f1.txt") or die "Can't open $!"; > #foreach (@File_Path) { > # print FILE $_; > # $t -> insert ("end", $_); > > #} > } HT

RE: inserting the file paths in between the two arrays ( text widget ) : Perl/TK

From: Perl Perl [mailto:perl.solut...@gmail.com] Sent: 05 June 2009 13:16 To: Brian Raven Cc: perl-win32-users@listserv.activestate.com Subject: Re: inserting the file paths in between the two arrays ( text widget ) : Perl/TK > Thanks a lot HTH ( Brian), > > This worked for m

RE: Compilation (Building ) of project once the file is saved + Perl/Tk

s. > #system("/View/Vobs>tools/Perl/bin/perl tools/Compile tools/Perl/bin/perl tools/pjtCompile.pm /View/Vobs/ > $Filename"); > } Also, it looks like you are (a) using global variables, or (b) not including 'use strict;' at the start of your code. Try to avoid (a), and

RE: LWP Help

rom google. > print $content; Just a guess, but are the links in the returned document relative? If so, hava a look at the example code in the doco for HTML::LinkExtor. HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not the intended recipie

RE: :FTP pasv_xfer() using problem

server. Perhaps $ftpout? > $lsize = stat("c:/temp/apj_697_1_106ej.zip")->size; > print "SIZE:- $lsize"; > $ftpout->quit() or die "FTP: Couldn't quit."; > $ftpin->quit() or die "FTP: Couldn't quit."; > > > MESSA

RE: CPAN install directory usage

.pl line 5. > > > This is at Windows OS. Could you please help me to overcome this? It is not really clear from the above, but it looks like Tk has not been installed, or at least not properly. The big question is why don't you install it using ppm, rather than from CPAN. It is

RE: CPAN install directory usage

From: Perl Perl [mailto:perl.solut...@gmail.com] Sent: 01 July 2009 14:37 To: Brian Raven Cc: perl-win32-users@listserv.activestate.com Subject: Re: CPAN install directory usage > Hi Brian Raven, > > I don't know by which way my system admin has install the module

RE: need help: TK windows - no task bar icon pls

withdraw and Popup, although I can see no documentation for Popup in TopLevel or its obvious base classes. Unless somebody comes up with a better answer, try copying DialogBox.pm, make mods to it and see what happens. If you discover the answer from that, don't forget to let us know what it is.

RE: need help with Tk: I could not figure the error

> use strict; perl will give you a clue if you add "use warnings;" here. It will even give some advice if you make it "use diagnostics;". > use Tk; > ... HTH -- Brian Raven This e-mail may contain confidential and/or privileged

RE: need help with Tk: I could not figure the error

From: Daniel Burgaud [mailto:burg...@gmail.com] Sent: 03 September 2009 03:00 To: Brian Raven Cc: Perl-Win32-Users Subject: Re: need help with Tk: I could not figure the error > Hi > > When I moved all the variables within the subroutines outside, this script suddenly worked f

RE: Using .cgi file as form action

: {}, $_)} @options); print p(); print submit("Use that"); print end_form; print hr(); } sub output_data { print h2("You selected something"); print "It was ", strong($sel); } -- HTH -- Brian Rav

RE: Strange Perl/Tk action

he menu tab. The height of the window remains unchanged > for all > subsequent menu actions. I have printed out the variable containing > the > nominated height of the window before and after making the selection > and it > does not change. I can compensate for this action by

RE: How to passing a hex number in Win32::API call

FT_LIST_NUMBER_ONLY => 0x8000; my $function = new Win32::API("ftd2xx", "FT_ListDevices", "PPN", "N"); die "Can't import API FT_ListDevices: $!\n" unless defined $function; my $DevBuffer = " " x 80; my $status=$function->Call($DevBuffer, 0 ,F

RE: Hitting a maximum number of SOCKET connections?

quot;), this was increased to 2000 for build 1001, so you might want to upgrade your Perl. HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender immedia

RE: Hitting a maximum number of SOCKET connections?

r scripts, and fixed the issues raised before running them. I strongly suggest that you do the same. -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender immediate

RE: Hitting a maximum number of SOCKET connections? Continued...

1 works , and has not been regressed.. I have just tried your code on Linux, and it seems to work as expected, i.e. pings seen on the server immediately after they are sent. So you may want to consider switching OS. HTH -- Brian Raven This e-mail may contain confidential and/or privileged i

RE: How do I create arrays in OO format?

e value > variables, but can't find examples of how to pass arrays or hash > values. > > Any suggestions? Read the documentation on OO that comes with Perl (perldoc perl$_ foreach qw{boot toot tooc bot}). Also Damian Conway's book comes highly recommended. I can't re

RE: How do I create arrays in OO format?

Serguei Trouchelle <> wrote: > Brian Raven wrote: > >> Read the documentation on OO that comes with Perl (perldoc perl$_ >> foreach qw{boot toot tooc bot}). Also Damian Conway's book comes >> highly recommended. I can't remember toe title off-hand, but y

RE: need help installing guitest

g and bribes repositories. Which version of Avtivestate perl are you using? Which repositories have you tried? HTH -- Brian Raven This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender

RE: WIN32::OLE WMI Out params

Root->GetChildNodeGroups(\$nodes, TRUE); > > print "Child Group Count: " . $objChildGroups . "\n"; > > print @arrNodes . "\n"; If I am right, and I may well not be, this would probably need to be something like: for my $obj (in $nodes) { print &q

RE: Help: Random Read/Write a binary file

e 'perldoc -q update'), but given the apparent age of that answer I would add advice to localise file handles and use the 3 arg form of open. If you mean to insert some data into the file then the general answer is to simply read from your original file and create a new output file. HTH -

RE: HTML Parsing Question

t}; # prints "button _parent value is > HTML::Element=HASH(0x1afa5c4)" > print "button _tag value is " . ${$button}{_tag}; # prints "button _tag value is button" > > $parent = $button->parent; > print "parent tag is " . ${$parent}{_t

RE: Perl Regex

ser will generally do a more reliable job of parsing XML that regular expressions, even Perl regular expressions. HTH -- Brian Raven Please consider the environment before printing this email. This e-mail may contain confidential and/or privileged information. If you are not the intended

RE: parsing email headers

t;http://search.cpan.org/search?query=datetime%3A%3Aformat&mode=all>, and on the fourth page I saw DateTime::Format::Mail, which sounds pretty much like what you are asking for. BTW, it seems to be available vie ppm as well. HTH -- Brian Raven Please consider the environment before pri

RE: Use DLL files at Unix server

esr/faqs/smart-questions.html>. -- Brian Raven Please consider the environment before printing this email. This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender immediately by

RE: Use DLL files at Unix server

recipients already have Perl installed), have a look at the source filtering modules like Filter::Crypto. HTH -- Brian Raven Please consider the environment before printing this email. This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have r

RE: Extract nested zip file

uld be a module that specialises in zip files like Archive::Zip, possibly in combination with Archive::Zip::MemberRead. HTH -- Brian Raven Please consider the environment before printing this email. This e-mail may contain confidential and/or privileged information. If you are not the intended recipi

RE: Tk, Tkx, PerlApp, etc

multiple languages, including Perl using Tkx. http://www.tkdocs.com/tutorial/index.html If you do go for it, and come up with any useful advice for converting PerlTk to Tkx, then please share. HTH -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may conta

RE: Need help with TK: scrollable adjustable columns of text

s scrolledtext + adjustable columns. I am not entirely clear what you are asking for, but have you looked at Tk::Hlist? It doesn't have adjustable columns, but I notice that there is a Tk::Hlistplus on CPAN which looks like it does. It seems to be in the PPM archive under the package nam

RE: Changing Subject color using MIME::Lite

f a specific MUA. If that's not possible or feasible, then you may want to rethink your requirement. HTH -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may contain confidential and/or privileged information. If you are not the intended recipient

RE: Win32::OLE on MS Word using Selection.Find.Execute

= $True > $objDoc = $objWord.Documents.Open($strWordFile) > > $objSelection = $objWord.Selection > > $d = get-content "d:/temp/acronyms.txt"# read file of acronym > | > definition > foreach ( $l in $d ) { > ($acro, $def) = $l.split('|')

RE: lame question "\\\\.\\pipe\\pipename" vs '\\.\pipe\pipename'

ng literals are subject to backslash and variable substitution; single-quoted strings are not (except for \' and \\). Unless you are using the string as a command line argument, then / should work, and not need escaping. HTH -- Brian Raven Please consider the environment before printin

RE: Checking for Available Port

local, $remote, $state) = split; my ($ip, $port) = split /:/, $local; if ($port == $port_to_check) { return $state; } } return "NOT IN USE"; } HTH -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may contain c

RE: Checking for Available Port

::Wrapper, that may be of interest. HTH -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender imm

RE: how to best convert an array containing hexadecimal values to asciivalue?

ack("(H2)*", @hex_array); Have another read through 'perldoc -f pack'. I usually have to whenever I use it. Also, I notice that all of your characters seem to be followed by a null byte. Are these perhaps 16 bit characters, or will you strip the null bytes out at some point? -

RE: does anyone know how to get a TRUE ntfs directory listing? usingPerl, or otherwise

ams" on files etc. What Jan said, especially about copying, plus... Sysinternals (http://technet.microsoft.com/en-us/sysinternals/default) has some utilities that will give you info on NTFS meta data files and ADS. There is even a Perl module on CPAN (and hopefully on PPM) to help with AD

Where's Tk?

I have Activestate Perl 5.12.2 (build 1202) installed. I can see some Tk extension packages in the PPM gui, but no sign of Tk itself. Is there a problem, or is just me looking in the wrong place? -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may

RE: Where's Tk?

-Original Message- From: Sisyphus [mailto:sisyph...@optusnet.com.au] Sent: 16 December 2010 22:26 To: Brian Raven; activep...@activestate.com; perl-win32-us...@activestate.com Subject: Re: Where's Tk? > - Original Message - > From: "Brian Raven" &g

RE: Where's Tk?

-Original Message- From: activeperl-boun...@listserv.activestate.com [mailto:activeperl-boun...@listserv.activestate.com] On Behalf Of Brian Raven Sent: 17 December 2010 17:25 To: Sisyphus; activep...@activestate.com; perl-win32-us...@activestate.com Subject: RE: Where's Tk? > ..

RE: experiencing Out of memory errors

t basis to > help us. Unless it is fairly easy to create a 64 bit setup, it might be worth expending some effort in checking whether your belief that you don't have a memory leak is sustainable. This may help. http://modperlbook.org/html/14-2-6-Memory-Leakage.html HTH -- Brian Raven Pl

RE: Invalid type 'Q' in pack

either provide a suitable diagnostic if support for 64 bit integer values is not available, or perform the necessary conversion. You might want to take that up with the module's maintainer. I don't know if it is possible/practical to build a 32 bit version of Perl with support for 64 bit int

  1   2   >