Re: Handling special characters in peoples names in XML

2013-06-25 Thread Gregory Machin
gt; From: Gregory Machin > > I'm debugging an application written in Perl that converse data exported > > from the Nessus security scanner in xml format. I have narrowed down the > > bug to an issue with special characters in names that are in the file > such > > a

Handling special characters in peoples names in XML

2013-06-19 Thread Gregory Machin
Hi. I'm debugging an application written in Perl that converse data exported from the Nessus security scanner in xml format. I have narrowed down the bug to an issue with special characters in names that are in the file such as Frédéric and Grégoire , thus é are most likely the guilty parties.

DBI driving me nuts ... !

2009-10-06 Thread Gregory Machin
Hi Please can you advise ? #!/usr/bin/perl use Mysql; $dbh = Mysql->connect("localhost","mailscanner","root","c0nc3pt") or die ("Error " . Mysql->errno . " - " . Mysql->errstr); $sql = "SELECT to_address FROM maillog LIMIT 10;"; $sth = $dbh->query($sql) or die ("Error " . Mysql->errno . " - " .

Re: regex question

2009-09-15 Thread Gregory Machin
Thanks for the help .. knowing the anchor thing help me. if you not sure what ur looking for or what it call you end up with the wrong thing. On Tue, Sep 15, 2009 at 10:21 AM, Tim Bowden wrote: > On Tue, 2009-09-15 at 10:10 +0200, Gregory Machin wrote: >> Any numbers, but only 3 digi

Re: regex question

2009-09-15 Thread Gregory Machin
and 3 digits from the phone number eg 011 . So I only want the records that beginning and end in a number and have exactly 3 digits not longer. Thanks for you time. G On Tue, Sep 15, 2009 at 9:52 AM, Tim Bowden wrote: > On Tue, 2009-09-15 at 09:30 +0200, Gregory Machin wrote: >> Hi

regex question

2009-09-15 Thread Gregory Machin
Hi I'm look for code example that will only select a string containing 3 digits .. The string cant be less than 3 digit , can't be more than 3 and can't contain any other characters. I have googled and found code that will find 3 consecutive digits within a string or at the beginning. Any ideas

Re: Trying to remove text in inverted commas.

2009-08-24 Thread Gregory Machin
10 6 0 4 N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A N/A On Mon, Aug 24, 2009 at 12:19 PM, Thomas Bätzler wrote: > Hello Gregory, > > Gregory Machin

Trying to remove text in inverted commas.

2009-08-24 Thread Gregory Machin
ot;([^"]+)\"\s)//g but it doesn't seem to work. I got it from a website .. It looked correct .. mmm .. with regard to it's structure i don't quite get ([^"]+) as I have tried replacing it with other combinations and had less luck. I have also tried s/\"([:word:])\"

Re: using ssh to do remote audit of machines

2008-09-09 Thread Gregory Machin
Thanks will look into those . On Tue, Sep 9, 2008 at 10:07 AM, Jeff Pang <[EMAIL PROTECTED]> wrote: > 2008/9/9 Gregory Machin <[EMAIL PROTECTED]>: >> Hi >> I have a database with my servers details in .. I would like to write >> a scripts to get the servers l

using ssh to do remote audit of machines

2008-09-09 Thread Gregory Machin
Hi I have a database with my servers details in .. I would like to write a scripts to get the servers log on info ssh to the box and get basic info using the following hostname cat /etc/issue cat /proc/cpuinfo | grep "model name" cat /proc/meminfo | grep "MemTotal" uname -s -r squid -v /usr/sbin/s

Re: store a complete object?

2008-08-05 Thread Gregory Machin
hi I dont see why you couldnt just INSERT the value into a database .. It's just the column type that may be the issue with mysql i would suggest the blob or one of the text types http://dev.mysql.com/doc/refman/5.0/en/blob.html .. On Tue, Aug 5, 2008 at 1:02 PM, Oliver Block <[EMAIL PROTECTED

system() function not executing scripts

2007-10-12 Thread Gregory Machin
cripts, i have chowned them to the user squid, and even chmod 0777 them, but no joy, yet they work fine if executed buy root what have i missed ? -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTE

Re: script won't write to file ...

2007-07-20 Thread Gregory Machin
Chas Owens <[EMAIL PROTECTED]> wrote: On 7/20/07, Gregory Machin <[EMAIL PROTECTED]> wrote: > Hi > I have a script that i'm working on, I want it to write info to a log > file, but I can't get it to write to the file.. I run the script as > root, and I also c

testing if hardware is avalible

2007-07-19 Thread Gregory Machin
Hi can you advise on the best way test if a usb modem is plugged in ? I though about checking if the file/node /dev/ttyACM0 is present, as it's created when the device is plugged in using open (TEST, "/dev/tty/ACM0"); but just concecned if i do this while the device is acitive it will cause it to

script won't write to file ...

2007-07-19 Thread Gregory Machin
my $loop = 1; while ($loop >= -1) { print STATUS_LOG localtime() . " sleeping\n"; sleep $mainloopsleep; } print STATUS_LOG localtime() . " ifwatch exiting"; close (STATUS_LOG); } 1 ; -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Dynamically loading perl code

2007-07-12 Thread Gregory Machin
On 7/12/07, Chas Owens <[EMAIL PROTECTED]> wrote: On 7/12/07, Gregory Machin <[EMAIL PROTECTED]> wrote: > Hi > I have a rusty memory of perl have the ability, where by you can load > perl code into an variable / array then execute it on demand, anyone > got an e

Dynamically loading perl code

2007-07-12 Thread Gregory Machin
Hi I have a rusty memory of perl have the ability, where by you can load perl code into an variable / array then execute it on demand, anyone got an example of how to do this .. Many Thanks -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

missing something from regex ...

2007-05-16 Thread Gregory Machin
and not found ./vpninfo.pl: line 2: syntax error near unexpected token `(' ./vpninfo.pl: line 2: `$row = ~/(\w+)\,(\w+)\,(\d+\.\d+\.\d+\.\d+\:\d+)\,(\d+\.\d+\.\d+\.\d+)\,(\d+)\,(\d+)\,\,(\d+)/' [EMAIL PROTECTED] ~]# what have I missed ... Many thanks -- Gregory Machin [EMAIL PR

Re: $ARGV[0] breaks the script

2006-12-15 Thread Gregory Machin
put=$ARGV[0] to give the process name from the command line, it runs as if the process is running if if I have stoped/killed it.. the only reason for this is that there is a hidden character, but where is it comming from ? On 12/14/06, D. Bolliger <[EMAIL PROTECTED]> wrote: Gregory Mach

$ARGV[0] breaks the script

2006-12-14 Thread Gregory Machin
$input=$ARGV[0]; #$input="httpd"; chomp $input; open PROS, "ps -ef|grep $input |"; while ($line = ){ unless ($line =~ m/grep/){ print "$input is running\n"; exit; } } print "$input isn't running\n"; exec "/etc/init.d/$input restart &";

creepy print() that doesnt print.

2006-12-13 Thread Gregory Machin
t does not print the hello. what have I missed .. Many thanks for your time -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: removing single quotation marks from a string ?

2006-11-23 Thread Gregory Machin
if ( $row[ 0 ] =~ /$regex/ ) { print < } else { > print "Malformed Log Entry: $row[0]\n"; > } > } > > undef $search; > undef $dbh; John -- Perl isn't a toolbox, but a small machine shop where you can special-order certain sorts o

Re: removing single quotation marks from a string ?

2006-11-16 Thread Gregory Machin
print("hour is $hour\n"); print("minute is $minute\n"); print("second is $second\n"); print("clientip is $clientip\n"); print("port is $port\n"); print("query is $qu

removing single quotation marks from a string ?

2006-11-16 Thread Gregory Machin
Hi I need to remove all the quotation marks from, a string I tried s/\'// but it did not work. what have i missed ?? Many Thanks -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: please advise help with regex

2006-09-28 Thread Gregory Machin
AIL PROTECTED]> wrote: Gregory Machin wrote: > Hi > I need to parse the logs for my named server. i'm having difficulty getting > my mind around the regex to break the data up .. i want the break it up and > store it in a data base then maniptulate the data from there ... &

please advise help with regex

2006-09-28 Thread Gregory Machin
uot; any ideas ? Many thanks -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za

Re: advise on writing cgi scripts to create + manage certificate authority.

2006-08-03 Thread Gregory Machin
Thanks for the lead ... But my question was focused on the creation of a certifictate authority mangment interface "using" cgi as aposed to comandline ... which is the norm ... I have a basic knowlage of perl cgi.. On 8/3/06, Gregory Machin <[EMAIL PROTECTED]> wrote: Hi I hav

advise on writing cgi scripts to create + manage certificate authority.

2006-08-03 Thread Gregory Machin
Hi I have to write a cgi appliction to manage a certificate authority for AES 256 CBC and 128 CBC ... How would I go about this the only application I have used for this was comand lline interactive... Any suggestions .. -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za

Re: need to return exit code

2006-07-31 Thread Gregory Machin
thanks for the support guys .. have a grate day .. On 7/31/06, Prabu <[EMAIL PROTECTED]> wrote: Gregory Machin wrote: > Hi > My perl script is called by a bash script, used in a compile / build env. > But the bash script is not seeing my script's exit and is timming

need to return exit code

2006-07-31 Thread Gregory Machin
Hi My perl script is called by a bash script, used in a compile / build env. But the bash script is not seeing my script's exit and is timming out and continuing ... How can I pass a standard exit code 0 = success 1 = fail to the operating system / calling script. Many Thanks -- Gregory M

Re: regex and parsing config file directives..

2006-07-14 Thread Gregory Machin
rated by a space into an array my $key = shift @array; gets the first value, of the array and sets key to this value $hash{$key} = [EMAIL PROTECTED] || 'nodefined'; ... sets the value of the hash to the array ?? } >From: "Gregory Machin" <[EMAIL PROTE

Re: regex and parsing config file directives..

2006-07-14 Thread Gregory Machin
alue) = split/\ /; to split the kay and the value ? -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za

Re: regex and parsing config file directives..

2006-07-14 Thread Gregory Machin
__END__ Run it and get the result output: $ perl test.pl $VAR1 = { 'PREFORK_CHILDS' => '5', 'IP' => '1.2.3.4', 'MIN_SPARE_CHILDS' => 'nodefined', 'PORT' => '80'

regex and parsing config file directives..

2006-07-14 Thread Gregory Machin
.pl opening config file for processing => dev => tun0 proto => tcp remote => 192.168.1.1 1194 resolv-retry => infinite => => => ca => ca.crt cert => greg.crt key => greg.key cipher => AES-128-CBC => verb => 3 => proto => tcp cert => greg.crt dev => tun0 ca => ca.crt key => greg.key remote => 192.168.1.1 1194 verb => 3 cipher => AES-128-CBC resolv-retry => infinite Many Thanks Greg -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za

regex and parsing config file directives..

2006-07-10 Thread Gregory Machin
persist_key} = $_; } but I still end up with an empty field ... Any ideas.. -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za

Re: perl + ncurses turtorial ?

2006-07-06 Thread Gregory Machin
source code.. with menus and windows and popups etc ... Thanks On 7/7/06, JupiterHost.Net <[EMAIL PROTECTED]> wrote: Gregory Machin wrote: > Hi Hello, > I'm looking for an perl ncuses tutorial so I can write a remote admin > app to > work via ssh .. Not really a tutoria

perl + ncurses turtorial ?

2006-07-06 Thread Gregory Machin
Hi I'm looking for an perl ncuses tutorial so I can write a remote admin app to work via ssh .. Many Thanks -- Gregory Machin [EMAIL PROTECTED] www.linuxpro.co.za