Is there a Perl module that can automate ollydbg?
Is there a CPAN module that can automate the famous ollydbg debugger? If yes, could someone provide such module and some tutorials/documentaitons/example about it? ...
perl
How do I setup Strawberry Perl in MSYS?
I have Strawberry Perl and have msys Perl 5.6 removed. Now perl will invoke Strawberry (due to PATH env) but how do I map the perl command in .pl or other Perl script file which have #!/bin/perl or #!/usr/bin/perl header? I was think to make a hardlink of perl.exe into msys/bin or merge the whole Strawberry inside msys directory, but I'...
Why does m/$./m give me unexpected behavior?
In What regular expressions can never match? /$./ was given as a response. I played around with that a bit, and discovered that the following two lines of code generate different output. The second matches, but the first does not. Can anyone explain why? $ printf 'a\nb\n' | perl -0777 -ne 'print if m/$./m' $ perl -0777 -e '$_="a\nb\...
How to Install DBD::Oracle in Strawberry Perl
I am trying to install DBD::Oracle using the CPAN shell in Strawberry Perl. I initially experienced an error because the Makefile could not locate an OCI library, so I installed the instant client from Oracle. I thought this would fix the problem, but now I get a large mixture of errors and warnings from Oracle.h, dbdimp.h, Oracle.c, O...
Will Oracle 9i OCI driver work with an Oracle 10g server?
I'm in charge of a Perl application that uses DBD::Oracle compiled against a 9.2.0.8 OCI client. This is on a sun4u box, albeit with 32-bit binaries. DBD::Oracle is linked against 32-bit OCI libs. We're currently running against a 9i server. Our DBA team is planning to upgrade the server to 10g, namely 10.2.0.4. I'm faced with two optio...
Does a regular expression exist for enzymatic cleavage?
Does a regular expression exist for (theoretical) tryptic cleavage of protein sequences? The cleavage rule for trypsin is: after R or K, but not before P. Example: Cleavage of the sequence VGTKCCTKPESERMPCTEDYLSLILNR should result in these 3 sequences (peptides): VGTK CCTKPESER MPCTEDYLSLILNR Note that there is no cleavage after ...
perl precompiled regex question
Do I really get any benefit out of doing the following (as opposed to just putting the actual regex in place of the ${pcr} in both if statements)? (alot more lines are in the real data set but just using DATA for example. my $defs = 0; my $tests = 0; my $pcr = qr/\s*[\/\\]?\s*/; while (<DATA>) { $defs = ($1 ? 0 : 1) if /<(${pcr})d...
Is there a Perl shortcut to count the number of matches in a string?
Suppose I have: my $string = "one.two.three.four"; How should I play with context to get the number of times the pattern found a match (3)? Can this be done using a one-liner? I tried this: my ($number) = scalar($string=~/\./gi); I thought that by putting parentheses around $number, I'd force array context, and by the use of scal...
What happens on this my declaration? [ Perl ]
I know the title sounds funny, but I found this snippet somewhere: my MyPackage $p1 = MyPackage->new; What role does the name of the package serve in front of $p1? EDIT: I'm running perl 5.10.1. ...
MongoDB dbref in perl
Is there a way to do dbrefs using the Perl API? Its not here nor is it anywhere here. Here s a sample schema: book: name, publisher,isdn,{author} author : name,date of birth I could just add a field to serve as the reference but wanted to do it with dbref instead. Did I miss something? ...
Why does my Perl backticks complain "sh: line 1: any: command not found"?
I've never programmed before, but needed to write a very simple webapp for work. I'm trying to get this dig query to work: dig @8.8.8.8 +nocomments +nostats +noquestion +nocmd google.com any With this bit of perl: $dig = `/usr/bin/dig \@8.8.8.8 +nocomments +nostats +noquestion +nocmd $query any`; Except it doesn't seem to recogniz...
Why are some characters missing when I converted my Perl script to executable using Perlapp?
Before posting my question to the ActiveState forum, I'd like to try luck here :) I'm trying to convert a simple script of mine to .exe file using Perlapp (version 8.1). The Perl script works fine and it seems Perlapp also did its job successfully. But the converted .exe file has some weird behavior, which, I believe, must be related t...
Perl AND IDA PRO
Could someone provide a good link of documenation/material/examples of IDAPERL (a plugin to add perl scripting and automation support to IDA PRO ) i see there are many documentation about python and idapro but for perl it seems nothing . or could someone suggest a perl cpan module that automate the IDA PRO Degguber (http://www.hex-rays.c...
Is it possible to send POST parameters to a CGI script without another HTTP request?
I'm attempting to run a CGI script in the current environment from another Perl module. All works well using standard systems calls for GET requests. POST is fine too, until the parameter list gets too long, then they get cut off. Has anyone ran in to this problem, or have any suggestions for other ways to attempt this? The following...
Should I aggressively release memory while reading a file line by line in Perl?
Should I aggressively release memory while reading a file, line by line? An example: while (<FILE>) { my $line = $_; <process line> undef($line); } "Undefing" the $line variable is a good option for reducing memory consumption? ...
How do I create Perl module templates for more than one module in the same namespace?
I use h2xs and Module::Starter to create templates for my Perl modules. All these and others like Module::Build are great for creating one-off modules. Unfortunately, I have not been able to figure out a "clean" way of creating a family of related modules and their documentation and test suite templates in one go. Specfically, is it po...
What are some specific examples of backward incompatibilities in Perl versions?
It has been 22 years between the initial public release of Perl 1.0 (December 18, 1987) and the current stable release 5.10.1 (2009). During those 22 years the following notable releases have been made: Perl 1.0 (1987 - initial release) Perl 2 (1988 - better regular expressions) Perl 3 (1989 - support for binary data streams) Perl 4 (...
Passing C++ structure pointer from Perl to arbitary dll function call
Hi, I am using Win32::API to call an arbitary function exported in a DLL which accepts a C++ structure pointer. struct PluginInfo { int nStructSize; int nType; int nVersion; int nIDCode; char szName[ 64 ]; char szVendor[ 64 ]; int nCertifi...
Perl Regexes - Replacing certain instances of matches
I'm trying to replace text in a source file much like how the C preprocessor works. My approach is to parse constants and their values and populate a hash array with them. My problem is as follows: In the source file, I have: #define CONSTANT 10 #define CONSTANT_PLUS_ONE CONSTANT + 1 I use /^#define\s+(\w.*)\s+.*($key).*/ to match...
Line numbers with template toolkit
I am using the Perl Template Toolkit to generate C files. I dearly want to be able to include #line directives in my C code so that error messages from the C compiler send me to the right place (the template file) rather than the wrong place (the template output). However, I don't know how to do this. The only result I got from Google w...