I think that Rob was onto something, here
is my 2 cents.
The print line should be like this:
print <
and not
print< < EOF
like you have. I think maybe that what is
happening is that the error that is being printed is saying that it cannot find
“EOF” before end of file
Ok , all file contents and code are below, this is a sort of complicated
issue. I have a config file with customer static information , a couple of
modules, and a script. The basis of the problem is that in the config file
there is an sql query that has some variables in it. The script calls one
mo
Ok basically I have written a module, and it works, I have updated the
documentation in the module, and it works for the most part. What I am seeing
is that when I use a single quote that the line looks like this when you use
perldoc.
ookup::GetInfo(’$affiliate’,’$ip_address’,’$dsl
your assistance.
Chris Hood
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Wednesday, June 01, 2005 8:02 AM
To: Christopher L. Hood
Cc: mysql@lists.mysql.com; beginners@perl.org
Subject: Re: DBD::Oracle issue
Hi,
I'll try even if this is not a neither o
ALL,
Can someone help out with this error:
DBD::Oracle::st execute failed: ORA-03106: fatal two-task communication
protocol error (DBD ERROR: error possibly near <*> indicator at char 23 in
'select table_name from <*>all_tables') [for Statement "select table_name
from all_tables"] at ./orac
:55 PM
To: Christopher L. Hood; beginners@perl.org
Subject: RE: :Oracle problems
[EMAIL PROTECTED] wrote:
> All,
>
> I am getting the following error while trying to use DBD::Oracle:
>
> DBD::Oracle::st execute failed: ORA-00900: invalid SQL statement (DBD
> ERROR: OCIStmtExecu
All,
I am getting the following error while trying to use DBD::Oracle:
DBD::Oracle::st execute failed: ORA-00900: invalid SQL statement (DBD
ERROR: OCIStmtExecute) [for Statement "describe ALL_USERS"] at
./oracleTest.pl line 69.
I have tested the connection manually with sqlplus, and al
Why doesn't this work to check the until it is one of the numbers
"1 2 3 4 5" ?? I have tried multiple variations of this with different
brackets ie. [ ] , and ( ) .
until($type_number == 1 .. 5 ){
print "Enter the number that corresponds to the type of offense you would
like a report for\n"
I have a need to have 3 different templates of email text outside of my
actual script, what I want to know is can I use variables in the templates
then open the file for reading and substitute the variables in the text
with some data saved in matching variables in my script?
Is there a module that
Ok I have an issue where I run an sql query against a database, and want
to evaluate whether or not an entry occurs for a given user, if NOT then
this run will be the first entry. Ok the problem occurs in the while
statement, everything works as expected if the user already has an entry
in the DB,
I wish to read input from a user that has multiple lines with carriage
returns from but not actually stop reading until a single # on a
line by itself. Is there a module / package / function that will aid in
this? I would like to do something like below:
Until( = "#") {
$incoming_
sltDSLinfo = split(/\//, $row[6]);
$rsltdslam = $rsltDSLinfo[0];
$rsltport = $rsltDSLinfo[2];
}else{
$rsltdslam = "";
$rsltport = "";
}
$start_time = DateCalc("$rsltdate $rsltrecord_time","-
$session_time sec
Ok, basically I have a list of start times, stop times, usernames, and
ip's in a database, I currently have code in place that will take in a
date and ip address and return a list of people that had that IP address,
with the time that they acquired the ip and the time that they released
the ip.
Wh
: Wednesday, April 06, 2005 8:42 AM
To: Christopher L. Hood
Cc: Perl Beginners List
Subject: Re: DBI object version 1.32 does not match $DBI::VERSION 1.48
On Wed, 6 Apr 2005 [EMAIL PROTECTED] wrote:
> I have upgraded DBI to version 1.48 and I am now having issues and
> errors with my script
on is installed?
Chris Hood
-Original Message-
From: Chris Devers [mailto:[EMAIL PROTECTED]
Sent: Wednesday, April 06, 2005 8:42 AM
To: Christopher L. Hood
Cc: Perl Beginners List
Subject: Re: DBI object version 1.32 does not match $DBI::VERSION 1.48
On Wed, 6 Apr 2005 [EMAIL PROTECTED]
I believe that I may have asked this question before and cannot find the
answer that I had gotten, So I will ask again.
I have upgraded DBI to version 1.48 and I am now having issues and errors
with my scripts. The error that I am getting is :
DBI object version 1.32 does not match $DBI::VE
Ok here is the deal, our admin is trying to install DBD::Oracle for me to
access one of our affiliates databases. The oracle "instant basic client"
and "sqlplus" has been installed as well as GetOpt::Long.
The installations all went well except for DBD::Oracle, it fails to
install, I am pretty sur
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Tuesday, August 31, 2004 12:10 AM
To: [EMAIL PROTECTED]
Subject: Re: How do i run shell command
It works for me . Thanks
Sudhakar Gajjala
Chris Devers <[EMAIL PROTECTED]> on 08/30/2004 10:47:55 PM
Please
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Tuesday, August 31, 2004 6:50 AM
To: [EMAIL PROTECTED]
Subject: delete all lines in a file save it come out
Hi ,
I have a problem in deleting all the lines in a file and saving it .
Actually my log file keep appe
please
notify the sender immediately and delete the message.
-Original Message-
From: Bob Showalter [mailto:[EMAIL PROTECTED]
Sent: Monday, August 30, 2004 2:41 PM
To: Christopher L. Hood; [EMAIL PROTECTED]
Subject: RE: shift question
[EMAIL PROTECTED] wrote:
> OK here comes the new
OK here comes the newbie question.
I found this in a template for creating subroutines, this is the base
that is created when you use the template to create the subroutine.
So now the newbie part, why would you place "my $par1 = shift;" in the
subroutine template, and what does it do??
Basicall
-
From: JupiterHost.Net [mailto:[EMAIL PROTECTED]
Sent: Wednesday, August 25, 2004 5:41 PM
To: Christopher L. Hood
Cc: [EMAIL PROTECTED]
Subject: Re: POD on new module to make sure it looks right before
uploading to CPAN
[EMAIL PROTECTED] wrote:
> Well I don't know if it is possible, how
Ok, this may or may not be a tricky one I will try and be succinct in my
statement.
I have a database (mysql 4.0) with radius log entries for each day, we
receive emails about Acceptable Use Abuses and must figure out exactly
who was online with a certain IP address when the abuse occurred. As yo
Ok, this may or may not be a tricky one I will try and be succinct in my
statement.
I have a database (mysql 4.0) with radius log entries for each day, we
receive emails about Acceptable Use Abuses and must figure out exactly
who was online with a certain IP address when the abuse occurred. As yo
Ok what I have is 3 variables assigned in the global block using my then
when I try to use those variables later in a subroutine I get an error.
The error is below:
Error during compilation of
/usr/local/rt3/local/html/cgi-bin/aupsearch.cgi:
Variable "$ip" will not stay shared at
/usr/local/rt3/l
Ok well that might be what you are looking for, but also check out
format, link below:
http://www-cgi.cs.cmu.edu/Web/People/rgs/pl-format.html
or
perldoc perlform
It should be an easy matter to format your output to however many
columns you want.
Chris Hood
Chris Hood
Investigator Verizon
Thanks to all that helped with this problem, and thanks especially to
RandyS as he hit the nail on the head. Here is the final working code
block below.
while () {
chop $_ ;
if( (/JUNIPER/) || (/REDBACK/) ){
print DSL $_ . "\n";
} else {
I have a log file with thousands of lines, some of those lines come in with garbage /
binary data in them. The lines with that happening are junk and of no use to me I want
to pattern match for the junk and simply do nothing with that line, all other lines
get divided into 2 different output fil
28 matches
Mail list logo
