PDK exe fails to run due to Data:Manip errors

2011-01-21 Thread Jason Lowder
Hello, I have an application that makes use of the Data:Manip module. It runs fine and compiles fine, but when running the exe I get: Name "Date::Manip::Lang::english::Language" used only once: possible typo at /Date/Manip/Base.pm line 1844. Use of uninitialized value $beg in string compari

Re: Determining if a file is open

2010-02-18 Thread Jason Lowder
And yes, this is under Windows. (Vista) Jason On 2/18/2010 8:38 AM, Jason Lowder wrote: Hello, Is there anyway to determine if a file is currently open by another process? I want to look at a file that is being generated by another program (sometimes a very large file) and determine

Determining if a file is open

2010-02-18 Thread Jason Lowder
Hello, Is there anyway to determine if a file is currently open by another process? I want to look at a file that is being generated by another program (sometimes a very large file) and determine when it is finally closed. I see the file attributes for things like size, owner, type etc. but

Displaying Hash key/values if you don't know what they are

2009-11-17 Thread Jason Lowder
Hello, I'm using the Win32::SqlServer module to execute queries against my database. Normally a query might look like: our $mySQL = SQLfunctions->new; $mySQL->createSQLConnection("localhost\\Company", "Import"); @results = $mySQL->runQuery("Select A,B from tablename;"); foreach my $rows (@res

How do I create arrays in OO format?

2009-11-12 Thread Jason Lowder
Hi, I'm trying to make my perl source as OO as possible (fairly new to it) and while I can set values in set methods, I can't seem to figure out how to set arrays or hashes this way. My code: package SQLfunctions; ... sub createPositionData { my ($self, @posData) = @_; $self->{...@_p

Using Win32::API to call C# methods?

2009-11-09 Thread Jason Lowder
Hello, I'm attempting to use a C# method from my Perl script but am receiving a return code of 127 and "unknown error" for $!. My code is as follows: - use Win32::API; sub CallCompanyImport { my ($self, $API) = @_; Win32::API::Type->typedef( 'string', 'unsigned char'); Win32: