Hiya
Is there a module to parse time.
I.e. 00:01:20.
The idea was to convert a string, i.e. time, and then to see if the time given
is greater than a threshold, for example 1 hour.
Hope I make sense. If anyone could help, it would be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe
Hiya
Im looking to buy perl cookbook. I see the second edition was released 2003.
Before I go off and buy it, does anyone know if perl cookbook 3rd edition, is
ever going to be published?
Regards
Brent Clark
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e
DBD::Sybase.
For Freetds, just edit the /etc/freetds/freetds.conf. there is an
example at the bottom. Profiles called MyServer2k.
HTH
Regards
Brent Clark
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
despertate i even tried something silly as
join( \n, split(/#.*#/,
#aaa#message:details;extra:info;variable:times;#bbb#message:details;extra:info;variable:times;#ccc#not:always;the:same;ts:14:00.00;))
if anyone can help, it would so appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail
achieve to use the
methods of CGI. As said header() works, but param() does not.
If someone can help me understand this, or please show me where I am
going wrong, I would appreciate it.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e
Chas. Owens wrote:
On Tue, Feb 24, 2009 at 03:20, Brent Clark brentgclarkl...@gmail.com wrote:
snip
Thank you.
I understand and its working now ( even a few lines less ;) ).
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail
be appreciated
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: beginners-cgi-unsubscr...@perl.org
For additional commands, e-mail: beginners-cgi-h...@perl.org
http://learn.perl.org/
Hiya
Ive been tasked with building a ajax chat but it has to be with a perl
backend.
Anyone know of any existing projects to help with rapid dev.
I looked at the various PHP projects out there, but Management wants Perl.
TIA
Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Jeff P. wrote:
use File::Basename;
my $path = dirname(/home/brent/cgi-bin/scripts/common/ticktaktoe);
my ($var) = $path =~ /.*\/(.+)$/;
Thank You
Worked like a bomb.
Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http
.
Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Rob Coops wrote:
What the (?!Victoria) bit does is nothing at first the gets matched and
then the (?!Victoria) bit kicks in and checks to see if the string
Victoriais not (thats the !'s doing use and = to require it) infront
of the .
Thank you so much,
Regards
Brent
--
To unsubscribe,
Dear all
We have a 64bit machine running SLES10 on which I would like to
install Bugzilla, I downloaded it and ran the ./checksetup.pl
–check-modules script.
I then ran 'perl –MCPAN –eshell' and did a install Bundle::Bugzilla
It then did the lot of install and questions which I cannot
I suggest you read this.
http://weblog.infoworld.com/fatalexception/archives/2008/08/bitten_by_the_r.html
and
http://blog.vipul.net/2008/08/24/redhat-perl-what-a-tragedy/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
.
read on filehandle failed: Undefined subroutine Fh::read
at /usr/lib/perl5/XML/LibXML.pm line 531 at /usr/lib/perl5/XML/LibXML/SAX.pm
line 64
at /usr/share/perl5/XML/Simple.pm line 366
I dont mind creating the tmp file, I just think its a very crappy way of doing
things.
Thanks again
Brent Clark
Hi
Heres my silly Q for the day
I would like to upload a xml file, and would like the file to sent directly to
XMLin().
Im trying to find a way of not have to create the file in /tmp, and heres my
working code.
my $filename = $cgi-param(filename);
#my $filename =~
Hi
Does anyone have any cool and helpful links / URLS for Session Handling and
populating a table?
I would like to build a page for authorization.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Hey all
Would anyone know of a perl script to extract an attachment.
If anyone could assist it would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
any
difference, if someone could assist, I would me
most greatful.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
with a real tosser.
So my question is, for those out there working a dev environment, would anyone
care to share if my way of thinking is wrong etc.
Or anything for that matter
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http
from his
side, but still I cant escape how old school this all is.
Maybe he's trying to make it soo that the project does not diffirentiate too
much. Will be easier for the next employee.
But I think im going to settle with Ron Goral's option 3.
Thanks to all who replied.
Kind Regards
Brent Clark
Hi all
I have a string like so
01.01.04
I need to split and add it to an array
my method of
($abc) = $test =~ /\./g;
does not seem to provide me with a satisfying result
and I get back is the period.
If anyone could assit, it would be most helpful
Kind Regards
Brent Clark
are not escaped etc, and therefore fetchmail
only processing only half the string.
If anyone knows how I can achieve in processing the string as is, would be most
grateful
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http
Hi all
I came across a link where there was just a ? at the end of the link.
e.g.
http://www.gmx.net/?
Is there a particular reason or purpose for this.
Just something I was wondering.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
, but its only if I have one,
then I get nothing.
If anyone could assist me, I would be most grateful.
Kind Regards
Brent Clark
= Data :: Dumper -==
$VAR1 = {
'picture_comments' = {
'pic4
.
Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
48.
Ig someone would so kind as to point out to me, where im going wrong and to
maybe share some tips,
I would be most grateful.
Kind Regards
Brent Clark
#- Code below
package sql_handler;
BEGIN {
use Exporter;
use vars qw( $VERSION
would be most
grateful
Kind Regards
Brent Clark
-
#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use header;
use body;
my $html = new CGI;
print $html-header();
print world_header;
print world_body_top
John Doe wrote:
@EXPORT = qw(
$html
world_body_top
labels;
);
typo: ; after labels
and don't forget to also include
use warnings;
hth, joe
AArghh I cant believe I didnt see that.
Thanks for this.
Hi
Anyone know if theres an archive link for this mailing list.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
);
}
?
Im trying to have my PHP fire the value to the perl script.
If anyome has any tips or advise, I would be most grateful.
Kind Regards and thanks in advance.
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
Hi all
Just a thought, is it possible to compile perl code in to some type of binary
format file, and then perl can execute the bin file.
Just somthing I was thinking.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED
'
},
'kwam01' = {
'Thatched Chalet' = 'Chalet',
'Luxury Safari Tent' = 'LuxTnt'
},
I basically want just:
Luxury, Thatched Chalet', Luxury Safari Tent etc.
If anyone would could assist me, I would be most grateful.
Kind Regards
Brent
on my CV.
Any tips or advice would be most appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Hi list
I have im trying to enhance my regex skill.
My questions is, would
m/^p11[016]/io
match like
m/^(p110|p111|p116)/io
Any tips or advice, would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
open to race condition.
So my question is, whats the best what to update / amend a file.
Your tips and or advice, would great fully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
Hi List
This whole, using seek has kind put me off for the day.
Would someone be so kind as to please over look me code and if possible, point
out where I am going wrong.
Kind Regards
Brent Clark
===
open(HDATFILE, + $fileName.dat
just use flock as well as the modules Fcntl.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Hi all
I need to remove the string room (notice the check for a space too) and also
to check for spaces in the beginnig and then maybe at the end
of the total string.
$p110rm01 =~ s/(\sroom|^\s*|\s*$)//igo;
Would someone be so kind as to check this for me.
Kind Regards
Brent Clark
Muthukumar wrote:
It is correct. You can try as,
# echo hi this is a room ok | perl -ne 'if ( /\s*.*\sroom.*\s*/ ) {
s/ room//;}print;'
# hi this is a ok
Hi
you the man
I cant believe I was sooo stupid in not thinking of your solution.
thanks again
Brent Clark
--
To unsubscribe, e-mail
is, is there any way I can use local or something to stop strict
from moaning about this varibles.
Any tips etc would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
with second aswell.
If anyone can help your advice would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Brent Clark wrote:
Hi all
I have a date as the example format
01.01.06 (I know, but thats how I got it)
anyway I need to check that this date is greater than current days date.
Would anyone have any solutions to this problem.
I have looked at the cpan repository, but from what I see
the value to a new array.
Also I need to state, please dont shoot me on this code, I just got
passed on too.
If anyone can help, it would be most appreciated.
Kind Regards
Brent Clark
#--
sub
' = \_unknown_html,
'queue' = \_queue_html };
The following code comes from the Tom Kistner's exilog
(http://duncanthrax.net/exilog/).
Would someone please share some info on why \ and not just ?
When do you use this?
Thanks in advance.
Brent Clark
--
To unsubscribe, e-mail
= $ref_hash-{$fileName}{$roomCode};
and the print is fine.
its just when I add the name to the hash or arrays.
If anyone could point out where im going wrong, I would greatfully
appreciate your help.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED
Brent Clark wrote:
Hi list
I have my code as so:
for my $roomCode ( keys %{ $ref_hash-{$fileName} } ){
my $roomName = $ref_hash-{$fileName}{$roomCode};
if( $pCode eq 'p110'){
if ($p110rm01 eq $roomName ){
$finalHash{$fileName}[0] = $roomName;
my Data::Dumper
Brent Clark wrote:
Brent Clark wrote:
Hi list
I have my code as so:
for my $roomCode ( keys %{ $ref_hash-{$fileName} } ){
my $roomName = $ref_hash-{$fileName}{$roomCode};
if( $pCode eq 'p110'){
if ($p110rm01 eq $roomName ){
$finalHash{$fileName}[0] = $roomName
' = {
'StndRm' = 'Standard Room',
'Suite' = 'Suite',
'Pent' = 'Penthouse'
},
If anyone could be so kind to help, it would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL
Hi List
A big thanks to all.
I really appreciate your assistance in this.
Kind Regards and a big thanks again.
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
would be kind to help me, it would be most appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
anyone be so kind as to share how I would go about this.
I can pass the whole hash, but that would not be right.
Kind Regards and thanks in advance
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
would greatfully be appreciated.
I tried googling and the perldoc, but I havent found a decent answer.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
look something like so
/^*\|/ # Get the beginning of the CSV file, extract the filename, to
#the first pipe
but I need to extract and pass the value to a variable.
Would anyone have any tips or advise on this.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED
.
Any tips / feedback would greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Sorry I for got to add.
In the second statement
I only get a 1
Thanks
Brent
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
).
If the pattern match has the /g modifier on it (for global matching),
the context changes how it behaves as well.
Thanks so much.
I cant believe I did know, realise that.
Thanks again
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED
Beast wrote:
Hi all,
Is it possible to limit memory used by perl? I don't want perl program
to eat all memory causing OS to freeze.
Hi
Maybe you should relook / think yout app and see where you can make it
more effienct
Kind Regards
Brent Clark
P.s. How much memory is the machine
Currently I have the bookingNumber / s etc
Im hoping you or someone will be able to understand.
Again, thank for your reply
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
billcode/billcode
sellcurZAR/sellcur
auditusertbrink/audituser
/agentNameOne
agentNameTwo
etc tags for agent two
/agentNameTwo
agentNameTwo
etc tags for agent three
/agentNameTwo
A big thanks to replying to me.
Really appreciate this.
Kind Regards
Brent Clark
Graeme St.Clair wrote:
Try something like:-
$html .= start_html( -title = Rhubarb,
-style = { 'src' = '../rhubarb.css' },
-script = [ { 'src' = '../rhubarb.js' },
$jscript ]
);
HTH,
obviously it looking for the file and not making a http connection.
If anyone has any tips or advice, it would be great fully be appreciated
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
Hi all
keep getting this message below.
Undefined subroutine main::Link called at C:/Program Files/Apache
Group/Apache2/cgi-bin/ecco/scripts/common/getXmlAgents.pl line 24.
Here is my code
print $html-header(),
$html-start_html('Get REMOTE BOOKINGS',
-head=Link({-rel='STYLESHEET',
Hi all
Would anyone be so kind as to look at my code.
Im trying to create a hash of hashes
Thanks in advance
Brent Clark
while(DATFILEREAD){
chomp;
@linex = split(/\|/);
my
Hi all
Im trying to get the numbers before the hyphen
e.g.
75664545-bookings
Can I use index() for this ?
If anyone has any tips or advice, it would be greatfully be appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
John W. Krahn wrote:
Brent Clark wrote:
Yes you could:
$ perl -le'
my $string = 75664545-bookings;
my $pre_hyphen = substr $string, 0, index $string, -;
print $pre_hyphen;
'
75664545
Hi thanks for this
Cant believed I struggled, for / with something so simple
Regards
Brent Clark
method / solution it would great fully be
appreciated.
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
it works, I dont really like this solution. I would prefer that
perl talks to crystal it self.
If anyone has any advice or tips, it would greatfully be appreciated
Kind Regards
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http
with this mailing list
that most others would appreciate that it be taken of the list, taken in
a of the list manner.
If anyone would be so kind as to help, it would be greatly be appreciated.
Kind Regards
Brent Clark
=
tr
Hi
would anyone know of a perl script to convert image resolutions.
But I have a whole host of pics to convert
Kind Regards
Brent
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
when or why I would use it.
Just something I was thinking.
Kind Regards and thanks in advance
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Hi
I have been trying to get my perl to work with an xml doc (about 2 hours
new to xml).
I basically just want all the titleelements
would anyone be so kind as too share a link of doc etc as how I can
takle this.
Kind Regards and thanks in advance
Brent Clark
] Premature
end of script headers: /home/abc/cgi-bin/xyz/scripts/agent/logon.pl
If anyone could be of any assistants, it would be so appreciated.
Kind Regards and thanks in advance
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org
] Premature
end of script headers: /home/abc/cgi-bin/xyz/scripts/agent/logon.pl
If anyone could be of any assistants, it would be so appreciated.
Kind Regards and thanks in advance
Brent Clark
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org
Chris Devers wrote:
Please, just one copy of the email. Thanks.
On Mon, 6 Dec 2004, Brent Clark wrote:
In my apache log files, I keep getting this:
[Mon Dec 6 17:51:35 2004] [error] [client 192.168.111.214] Premature
end of script headers: /home/abc/cgi-bin
http://www.bagley.org/~doug/shootout/index2.shtml
http://www.bagley.org/~doug/shootout/bench/ary3/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
77 matches
Mail list logo