Stanisław T. Findeisen wrote:
use constant {
SOME_CONSTANT => 'some value'
};
$hash{SOME_CONSTANT} = 'value 1';
Not weird at all, just works as documented.
So change to either:
$hash{ +SOME_CONSTANT } = 'value 1';
or:
$hash{ SOME_CONSTANT(
Hi all,
Would somebody please show some light on what's happening here.
I'm trying to parse a sample xml file like below
Dummy1
Dummy2
When i run to parse with a sample script like below
use XML::Simple;
use Data::Dumper;
my $lXMLFile = "$ENV{'PWD'}/xml
Shawn H Corey wrote:
> Bruce Ferrell wrote:
>> Somehow my data is being transformed.
>>
>> The CGI code is:
>>
>> #/bin/perl
>>
>> use CGI::Util qw( escape unescape make_attributes );
>> use CGI;
>> use CGI qw( escapeHTML );
>>
>> my $q= new CGI;
>>
>> my $data
Bruce Ferrell wrote:
> Somehow my data is being transformed.
>
> The CGI code is:
>
> #/bin/perl
>
> use CGI::Util qw( escape unescape make_attributes );
> use CGI;
> use CGI qw( escapeHTML );
>
> my $q = new CGI;
>
> my $data = $q->param( 'POSTDATA' );
>
param( 'POSTDATA' );
ADD
6ec973aa3f7a96e43f86b8d2aea0585ba3096c28
5551313
SMS
15551212
Test message sent from script %%DNAME%% %\xdaTE%%
ALERT
ADD
6ec973aa3f7a96e43f86b8d2aea0585ba3096c28
5551313
SMS
15551212
Test message sent from script %%DNAME%% %%DATE%%
ALERT
http://learn.pe
Somehow my data is being transformed.
The CGI code is:
#/bin/perl
use CGI::Util qw( escape unescape make_attributes );
use CGI;
use CGI qw( escapeHTML );
my $q = new CGI;
my $data= $q->param( 'POSTDATA' );
print STDERR $data ."\n";
The output is:
ADD
> "JG" == Jim Gibson writes:
>> print "Content-type: text/html\n\n";
>> $forminfo = ;
>>
>> @key_value_pairs = split(/&/,$forminfo);
>> foreach $pair (@key_value_pairs){
>> ($key,$value) = split(/=/,$pair);
>> $value =~ s/\+/ /g;
>> $value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack(
At 5:45 AM +0200 10/18/09, adlai burman wrote:
Hello and help, please.
This is actually a CGI/Perl issue I am having but Perl seems to be the
closest forum here.
I am having a very simple (hence very frustrating) problem with a CGI/
Perl script. For some reason if I pass things from a checkbox t
Hello and help, please.
This is actually a CGI/Perl issue I am having but Perl seems to be the
closest forum here.
I am having a very simple (hence very frustrating) problem with a CGI/
Perl script. For some reason if I pass things from a checkbox they all
get passed fine but the last item is pas
On Fri, Mar 6, 2009 at 03:31, "Stanisław T. Findeisen"
wrote:
> Chas. Owens wrote:
>>
>> SOME_CONSTANT is being interpreted as the string "SOME_CONSTANT".
>
> Why is it so? This is crazy.
Because it is nicer to say $hash{key} than $hash{"key"} and Perl is
optimized for the common case. When you
Larry. Maybe back
then when it was Perl 1, but the current Perl is written and
maintained by a lot more people.
> Gunnar Hjalmarsson wrote:
> > So, what behavior exactly is it that you consider weird? What output had
> > you expected?
>
> I'd expect equal hash keys to ma
g to have to tell us what you mean by "crazy". If you
just mean that you'd prefer a full specification and multiple
implementations then you might be pleased with the direction that Perl 6
is taking. Otherwise, the current situation seems to have worked pretty
well for the last 21 years.
ifferent things!
Gunnar Hjalmarsson wrote:
So, what behavior exactly is it that you consider weird? What output had you
expected?
I'd expect equal hash keys to map to equal values.
I'm a conservatist. :-)
STF
===
h
alue is: value 1/value 2
Comparison 1: 1
Comparison 2: 1
???
So, what behavior exactly is it that you consider weird? What output had
you expected?
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
On Thu, Mar 5, 2009 at 12:23, "Stanisław T. Findeisen"
wrote:
> #!/usr/bin/perl
>
> use warnings;
> use strict;
>
> use constant {
> SOME_CONSTANT => 'some value'
> };
>
snip
> print("The value is: " . $hash{SOME_CONSTANT} . '/' . $hash{$index} . "\n");
snip
SOME_CONSTANT is being interpreted
#!/usr/bin/perl
use warnings;
use strict;
use constant {
SOME_CONSTANT => 'some value'
};
my $index = 'some value';
my %hash = ();
$hash{SOME_CONSTANT} = 'value 1';
$hash{$index} = 'value 2';
print("The value is: " . $hash{SOME_CONSTANT} . '/' . $hash{$index} . "\n");
print("Comparison 1:
On Mon, Nov 3, 2008 at 13:16, Kent, Mr. John, Contractor, Code 7500
<[EMAIL PROTECTED]> wrote:
snip
> In the text document they are written as
>
> Deg = °
> Apostrophe (') = <92>
> Open quote (") = <93>
> Closed quote (") = <94>
snip
How are you viewing the file? Most likely the <92> notation
Dear Guru's
I have some nautical word documents that have been converted to text,
That I am parsing and converting to html.
Everything is easy except for what happens to the degrees,
Apostrophes and quote symbols
In the text document they are written as
Deg = °
Apostrophe (') = <92>
Open quo
[ please do not multi-post! ]
Patrik Hasibuan wrote:
I am writing perl-cgi application for uploading a file. I did "chmod
777 ../../artikel". But I get weird displayed message:
"
ueri: 4CyrMz2ZeGIClwYfFsVdcv Co
î 6êÎ]Ë kšfþx·¾ ðfS4M3>º {½‡<Óöù³®�¯3çý
Dear my friends...
I am still new in perl.
I am writing perl-cgi application for uploading a file. I did "chmod
777 ../../artikel". But I get weird displayed message:
"
ueri: 4CyrMz2ZeGIClwYfFsVdcv Co
î 6êÎ]Ë kšfþx·¾ ðfS4M3>º {½‡<Óöù³®�¯3çýGèBù= „¬È›ø
ash wrote:
Hello fellow scripters!
Hello,
I've come across weird regex like this: (.{4}).(.{21}).(.{3})..(.{3}).
(.{10}).(.{9}).
Has anyone any idea about the syntax of these regex? Thank you for
your help.
The period (.) matches any character except the newline character unless th
Hello fellow scripters!
I've come across weird regex like this: (.{4}).(.{21}).(.{3})..(.{3}).
(.{10}).(.{9}).
Has anyone any idea about the syntax of these regex? Thank you for
your help.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
On 2/2/07, oryann9 <[EMAIL PROTECTED]> wrote:
I am aware of the bit | operator
Perl does have a bitwise operator whose name is the vertical pipe
character; but the one under discussion is the regular expression
operator whose name is the vertical pipe character. Both uses treat
the vertical ba
Jay Savage <[EMAIL PROTECTED]> wrote:On 2/1/07, oryann9 wrote:
> oryann9 wrote: Hello Perl list,
>
[snip]
>
> I was able to figure it out. The solution was /s.
> my $regexp = qr/.*\x3a5101.*/s;
>
> However, when I put multiple port numbers in the regexp it does NOT work.
> I want to store them
On 2/1/07, oryann9 <[EMAIL PROTECTED]> wrote:
oryann9 <[EMAIL PROTECTED]> wrote:Hello Perl list,
[snip]
I was able to figure it out. The solution was /s.
my $regexp = qr/.*\x3a5101.*/s;
However, when I put multiple port numbers in the regexp it does NOT work.
I want to store the
oryann9 <[EMAIL PROTECTED]> wrote:Hello Perl list,
I need to grab from an intel machine all lines with :5101 from netstat -a.
If I dont group the regexp using parens then it prints all the needed lines.
If I group the regexp using parens then it does not print all the needed lines.
Any help a
Hello Perl list,
I need to grab from an intel machine all lines with :5101 from netstat -a.
If I dont group the regexp using parens then it prints all the needed lines.
If I group the regexp using parens then it does not print all the needed
lines.
Any help and an explanation...I am c
John W. Krahn wrote:
You do realise that putting executable scripts in /tmp is a huge security risk?
Yes, the actual script is on different location, this is just for
testing only.
return $ret || "";
}
When run using cmmondline, it works (gives the correct output), but when
scheduled
Beast wrote:
>
> Hi all,
Hello,
> I have problem in perl script when executing external bash script using
> backtick.
>
>
> pscript.pl:
>
> my $resultt = &execute();
>
> print "RES: $result\n";
>
>
> sub execute() {
> my $ret = `/tmp/ping_yahoo.sh`;
You do realise that putting executabl
Hi all,
I have problem in perl script when executing external bash script using
backtick.
pscript.pl:
my $resultt = &execute();
print "RES: $result\n";
sub execute() {
my $ret = `/tmp/ping_yahoo.sh`;
return $ret || "";
}
When run using cmmondline, it works (gives the correct outpu
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;
Brent Clark am Mittwoch, 3. August 2005 10.43:
> Hi list
Hi
> 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 ){
>
e;
my Data::Dumper return as so:
Hi list
This is soo weird because I have it more then once:
$VAR1 = {
'Alph02' => [
'Chalet'
],
'Grac01' => [
${\$
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
Dear All,
I have to convert these lines into individual part of name information
with a single regular expression.
Input:
B. E. Conway,
J. O. M. Bockris
B. Conway
Output:
B.E.Conway
J.O. M.
Bockris
B. Conway
Can anybody help me in getting the single regular expression.
Thanks for the help.
Rega
Harold Castro wrote:
Hi,
Hello,
I'm parsing a log file that contains this format:
1112677214 31388202 181264589
1112677214 8843 59460 8843 59460
1112676919 10728 59045 10728 59045
1112676900 10617 59006 10728 59045
1112676600 8693 58389 9531 59661
These logs are in unix timestamp format:
I'm tryin
Harold Castro <[EMAIL PROTECTED]> wrote:
> I'm parsing a log file that contains this format:
>
> 1112677214 31388202 181264589
> 1112677214 8843 59460 8843 59460
> 1112676919 10728 59045 10728 59045
> 1112676900 10617 59006 10728 59045
> 1112676600 8693 58389 9531 59661
>
> These logs are in uni
Hi,
I'm parsing a log file that contains this format:
1112677214 31388202 181264589
1112677214 8843 59460 8843 59460
1112676919 10728 59045 10728 59045
1112676900 10617 59006 10728 59045
1112676600 8693 58389 9531 59661
These logs are in unix timestamp format:
I'm trying to convert the first
On Jun 14, Randy W. Sims said:
>I've always thought that behaviour kinda weird myself (though now it's
>become second nature). I like the way Ruby has two versions for chop/chomp:
>
>newstring = str.chomp; # leave original untouched
>str.chomp!;# update orig
always thought that behaviour kinda weird myself (though now it's
become second nature). I like the way Ruby has two versions for chop/chomp:
newstring = str.chomp; # leave original untouched
str.chomp!;# update original inplace
Of course, method names with punctuation take a litt
Mandar Rahurkar wrote:
>
> Hi,
Hello,
> I have attached my routine and its output. I dont understand the
> output differemce between the @subj and $subjectno ? Why do I lose the
> trailing zeros ?
>
> Thanks Mandar
>
> @subj= cat somefile.txt
> print @subj;
>
> foreach (@subj) {
> $subj
@subj= cat somefile.txt
print @subj;
foreach (@subj) {
$subject_no=chomp($_);
This assigns the return value of chomp() to the variable not the
chomp'ed version of $_;
perldoc -f chomp
Try this, it works the the same each time :
perl -mstrict -we 'my @subj = ("01\n","02\n","03\n");print
@subj
Hi,
I have attached my routine and its output. I dont understand the
output differemce between the @subj and $subjectno ? Why do I lose the
trailing zeros ?
Thanks Mandar
@subj= cat somefile.txt
print @subj;
foreach (@subj) {
$subject_no=chomp($_);
print $subject_no,"\n";
}
i am developing a text editor in Perl.
http://ziggy.fateback.com/doctorx
It isn't supposed to be extremely fancy, but hell, it should work.
Right now there is something weird with it... it opens up the save menu
immidietly as it launches. Why? Don't know.
note:
you will also
Kevin Old wrote:
On Thu, 2004-05-27 at 23:31, Andrew Gaffney wrote:
I am writing a program to parse a CSV file downloaded from my bank. I have it
keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
460.93 = 3.769998. But when 20 is subtracted from that,
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Andrew Gaffney) writes:
>I am writing a program to parse a CSV file downloaded from my bank. I have it
>keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
>460.93 = 3.769998. But when 20 is
Hi Andrew.
Andrew Gaffney wrote:
>
> I am writing a program to parse a CSV file downloaded from my bank. I have it
> keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
> 460.93 = 3.769998. But when 20 is subtracted from that, I get -16.23.
>
On Thu, May 27, 2004 at 10:31:08PM -0500, Andrew Gaffney wrote:
> I am writing a program to parse a CSV file downloaded from my bank. I have
> it keep a running balance, but I'm getting a weird total. Apparently,
> -457.16 + 460.93 = 3.769998. But when 20 is subtracte
On Thu, 2004-05-27 at 23:31, Andrew Gaffney wrote:
> I am writing a program to parse a CSV file downloaded from my bank. I have it
> keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
> 460.93 = 3.769998. But when 20 is subtracted from that
Andrew Gaffney wrote:
>
> I am writing a program to parse a CSV file downloaded from my bank. I have it
> keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
> 460.93 = 3.769998. But when 20 is subtracted from that, I get -16.23.
> There are n
> I am writing a program to parse a CSV file downloaded from my bank. I
have it
> keep a running balance, but I'm getting a weird total. Apparently,
-457.16 +
> 460.93 = 3.769998. But when 20 is subtracted from that, I get
-16.23.
> There are no weird numbers like that
On May 27, Andrew Gaffney said:
>I am writing a program to parse a CSV file downloaded from my bank. I have it
>keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
>460.93 = 3.769998. But when 20 is subtracted from that, I get -16.23.
>There are
On 28 May 2004, at 04:31, Andrew Gaffney wrote:
I am writing a program to parse a CSV file downloaded from my bank. I
have it keep a running balance, but I'm getting a weird total.
Apparently, -457.16 + 460.93 = 3.769998. But when 20 is
subtracted from that, I get -16.23. There a
I am writing a program to parse a CSV file downloaded from my bank. I have it
keep a running balance, but I'm getting a weird total. Apparently, -457.16 +
460.93 = 3.769998. But when 20 is subtracted from that, I get -16.23.
There are no weird numbers like that in my input data
I run a homegrown SMTP daemon written in Perl, on Redhat 7.3.
Lately, emails sent from some clients are received in duplicates. The
clients either run Communigate Pro, or IPlanet, MDaemon, all running
some versions of Windows.
The emails duplicate because the client sends it multiple times. The
ca
On Wed, Mar 24, 2004 at 09:41:32AM +0200, Claude wrote:
> Actually, I got it wrong from the beginning: although there may be
> ways go araound that, you _need_ the Test::More or Test::Simple from
> the beginning. Test::Harness design is based on their use. I did not get
> that right away.
If nece
> "Claude" == Claude <[EMAIL PROTECTED]> writes:
> "Paul" == Paul Johnson <[EMAIL PROTECTED]> writes:
Paul> Claude said:
>>> Hello,
>>>
>>> I tried to create a test suite file containing the following code:
[...]
Paul> use Test::More tests => 1;
Claude> Why would I need this separated
> "Paul" == Paul Johnson <[EMAIL PROTECTED]> writes:
Paul> Claude said:
>> Hello,
>>
>> I tried to create a test suite file containing the following code:
>>
>> -- clip ---
>> #! /usr/local/bin/perl
>>
>> use strict;
>> use Test::Harness qw( &runtests $verbose );
>> $verbose=1;
>> m
Randy W. Sims wrote:
On 03/19/04 00:58, Andrew Gaffney wrote:
I keep getting the following errors in my Apache error log every time
a certain script is run:
Prototype mismatch: sub
Apache::ROOT::cgi_2dbin::showday_2epl::time2str vs ($;$$) at
/usr/lib/perl5/5.8.0/Exporter.pm line 59.
at /home/
On 03/19/04 00:58, Andrew Gaffney wrote:
I keep getting the following errors in my Apache error log every time a
certain script is run:
Prototype mismatch: sub Apache::ROOT::cgi_2dbin::showday_2epl::time2str
vs ($;$$) at /usr/lib/perl5/5.8.0/Exporter.pm line 59.
at /home/httpd/cgi-bin/showday.p
I keep getting the following errors in my Apache error log every time a certain script is run:
Prototype mismatch: sub Apache::ROOT::cgi_2dbin::showday_2epl::time2str vs ($;$$) at
/usr/lib/perl5/5.8.0/Exporter.pm line 59.
at /home/httpd/cgi-bin/showday.pl line 4
Prototype mismatch: sub Apache::R
Claude said:
> Hello,
>
> I tried to create a test suite file containing the following code:
>
> -- clip ---
> #! /usr/local/bin/perl
>
> use strict;
> use Test::Harness qw( &runtests $verbose );
> $verbose=1;
> my @AoC = ( "t/00.pl" );
> my $len = @AoC;
> print "1..$len\n";
This
Hello,
I tried to create a test suite file containing the following code:
-- clip ---
#! /usr/local/bin/perl
use strict;
use Test::Harness qw( &runtests $verbose );
$verbose=1;
my @AoC = ( "t/00.pl" );
my $len = @AoC;
print "1..$len\n";
runtests( @AoC );
-- clip ---
The
On Wed, Oct 22, 2003 at 02:26:50PM -0400, Steve Grazzini wrote:
> #!/usr/bin/perl
> #
> # [ untested ]
> #
And it shows... :/
> die "Usage: $0 ERROR\n" unless @ARGV;
>
> my $num = shift;
> my $rx = qr/^#error$num$/;
>
> while (<>) {
> my $range = /$rx/ .. /$rx/;
You'd a
On Wed, Oct 22, 2003 at 12:59:33PM -0500, Jason wrote:
> I have a file formatted like this:
[ snip ]
> #error12
> # Couldn't set the transfer mode to binary.
> #error12
>
> I want to write code that searches for an error number, and then
> prints everything in between the two error number lab
I have a file formatted like this:
#error0
# This indicates that there was no
# error whatsoever.
#error0
#error1
# You have specified no arguments,
# so the program ran the 'PrintHelp'
# subroutine and then died.
#error1
#error2
# If you do not specify a type, then
# there is no way
I have been using:
use Mail::POP3Client;
$pop = new Mail::POP3Client( USER => "TheUser",
PASSWORD => "MyPassword",
HOST => "Mail.Host.com");
successfully for some time to read and parse email off a remote server.
I was aske
1a0' it works jsut
fine. The field is just text. Why does one random string work and
another fail?
Subject:
Weird problem with writing to PostgreSQL through DBI
From:
Ben Siders <[EMAIL PROTECTED]>
Date:
Wed, 29 Jan 2003 14:35:30 -0600
To:
[EMAIL PROTEC
I am parsing some XML and trying to write the tags to a table. Here is
the table (PostgreSQL):
Column | Type | Modifiers
---+-+---
id| integer |
ref_id| text|
ref_table | text|
tag | text|
seq | integer |
Here is the code where I
why bother , play america's army a little later; let kde finish ;-)
anyway you should be catching signals ( like ctrl-c ) in your script and
reset all environment variables and try giving a way so that the next
time you car run the script and it picks up from where it had left
Christopher J
sounds like some needed program/script is in your PATH when you run the
script but not when you are in the shell... are you modifying your PATH
variable in your script?
On Mon, 2002-12-09 at 12:23, christopher j bottaro wrote:
> hello again,
> i wrote a perl script to compile and install kde for
hello again,
i wrote a perl script to compile and install kde for me. compiling kde from
scratch can be an all day affair so its nice to have an automated script to
do it overnight or whatever. it works great if it finishes the whole way
thru, but the problem arises when i kill the script befo
Ron Woodall wrote:
>
> Hi All:
Hello,
> This is a convoluted problem and I hope I can describe it properly.
>
> I have about 90 html pages. I am extracting a small amount of
> information from each page and using that to create 90 more pages elsewhere
> in the site.
>
>
Hi All:
This is a convoluted problem and I hope I can describe it properly.
I have about 90 html pages. I am extracting a small amount of
information from each page and using that to create 90 more pages elsewhere
in the site.
What is happening is that I'm getting t
Steve wrote:
>
>
> Oops, that if should be which is still giving me the error:
> if ($line =~ /^(\d\d-\d\d-\d{4}\s+\d\d:\d\d:\d\d\.\d\d).+Session
>
oh, another problem is that if you are using:
mm-dd- hh:mm:ss
directly to Date::Manip's ParseDate() function, it won't work. if you have
sa
Steve wrote:
>
>
> Oops, that if should be which is still giving me the error:
> if ($line =~ /^(\d\d-\d\d-\d{4}\s+\d\d:\d\d:\d\d\.\d\d).+Session
>
i don't see why your expression won't work. prehaps it's something else that
isn't working...
david
--
To unsubscribe, e-mail: [EMAIL PROTE
At 12:54 PM 9/17/02 -0700, you wrote:
>Steve wrote:
>
> > I have this snippet of code which works fine. $start_time has MM-DD-
> > HH:MM:SS.MM which is what I want.
> >
> > #
> >
> > if ($line =~ /^(\d\d-\d\d-\d{4}\s+\d\d:\d\d:\d\d\.\d\d).+Connection
> > Establ
Steve wrote:
> I have this snippet of code which works fine. $start_time has MM-DD-
> HH:MM:SS.MM which is what I want.
>
> #
>
> if ($line =~ /^(\d\d-\d\d-\d{4}\s+\d\d:\d\d:\d\d\.\d\d).+Connection
> Established.+(\d\d\d\d\d)/i) {
> $start_time = $1
I have this snippet of code which works fine. $start_time has MM-DD-
HH:MM:SS.MM which is what I want.
#
if ($line =~ /^(\d\d-\d\d-\d{4}\s+\d\d:\d\d:\d\d\.\d\d).+Connection
Established.+(\d\d\d\d\d)/i) {
$start_time = $1;
printf ("Start Ti
On 4/3/02 4:02 PM, Pedro A Reche Gallardo <[EMAIL PROTECTED]>
wrote:
> Hi, I have a cgi script that uploads files but I have found that when
> those files are uploaded from a Mac or Windows the return character
> (maybe other characters too) are replaced by something else. Does any
> one know how
I'm not 100% sure on the Mac, but I know that Windows puts a CRLF (\r\n)
instead of just the unix newline (\n).
-Original Message-
From: Pedro A Reche Gallardo [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, April 03, 2002 4:03 PM
To: [EMAIL PROTECTED]
Subject: weird characters
Hi, I have a cgi script that uploads files but I have found that when
those files are uploaded from a Mac or Windows the return character
(maybe other characters too) are replaced by something else. Does any
one know how to avoid this? or alternatively, how can I translate
those characters into
From: "Jay M" <[EMAIL PROTECTED]>
> I am attempting to modify a large existing set of scripts. All of
> these scripts use dbmopen/close to create databases.
>
> when a database record is created and the key contains multiple
> words/variablels i.e. $DATABASE{"How" , "Are", $Yo
I am attempting to modify a large existing set of scripts. All of these
scripts use dbmopen/close to create databases.
when a database record is created and the key contains multiple
words/variablels i.e. $DATABASE{"How" , "Are", $You} = $value whenever I
output the key to html it prints the
Gary Hawkins wrote:
>
> I'm reading a 25 meg file that contains the content of web pages and their
> urls. The entire content of the file is placed in an array and then
> worked-over from there. (I know there are faster ways but ran into a loop snag
> with $/ redefine).
>
> The problem is that
I'm reading a 25 meg file that contains the content of web pages and their
urls. The entire content of the file is placed in an array and then
worked-over from there. (I know there are faster ways but ran into a loop snag
with $/ redefine).
The problem is that when I run the script the array on
At 05:19 PM 12/17/01 +1030, Daniel Falkenberg wrote:
>print<
>
>
> Out
> Of Office Message
>
> cols="41">@vac
>
>
Easiest thing to maintain would be something like
my $vac = join '', @vac;
Then put $vac inside the textarea inst
-Original Message-
From: Kristina Nairn [mailto:[EMAIL PROTECTED]]
Sent: Monday, 17 December 2001 3:14 PM
To: Daniel Falkenberg; Peter Scott
Cc: [EMAIL PROTECTED]
Subject: Re: Format of array in HTML text box gone weird...
Try the following code:
undef $";
print "@lines";
$"
e got a 'print "@lines";' thing going on.
Please include your perl code in your post.
Cheers,
Kristina
- Original Message -
From: "Daniel Falkenberg" <[EMAIL PROTECTED]>
To: "Peter Scott" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
weird...
At 02:23 PM 12/17/01 +1030, Daniel Falkenberg wrote:
>Just working on some HTML stuff at the moment and I have a come across
a
>little problem that I don't really understand
>
>Basically I place the following ararry (really only text) into a
>scrolling text box but
At 02:23 PM 12/17/01 +1030, Daniel Falkenberg wrote:
>Just working on some HTML stuff at the moment and I have a come across a
>little problem that I don't really understand
>
>Basically I place the following ararry (really only text) into a
>scrolling text box but when the text array is seen
Hi All,
Just working on some HTML stuff at the moment and I have a come across a
little problem that I don't really understand
Basically I place the following ararry (really only text) into a
scrolling text box but when the text array is seen through the text box
it looks like the following.
--
Shalini Raghavan
Center for Computational Genomics and Bioinformatics
University of Minnesota
ph : 612 - 624 - 9135 e-mail : [EMAIL PROTECTED]
I have a script that I wrote to take a tab- delimited file and split it
into
six constituent files.
While I must admit that the code is prob
I have a script that I wrote to take a tab- delimited file and split it
into
six constituent files.
While I must admit that the code is probably childishly lengthy,
it was the only way I could think
Firstly I was wondering how you could do this in aforeach such that
the name of each file that's pa
> Maxim Goncharov <[EMAIL PROTECTED]> said:
> I ran into the problem with forking and I am not able to figure out what
> happens. Here is the code (let's call the program server):
>
> $pid = open(HHH,"|- ");
> if($pid){
> print HHH "something\n";
> }else{
> exec "client"
> }
>
> Notice that
HHH) because I want the parent just to
spawn the child, print something into it, and exit. And that is exactly
what happens. If I look at processes I see only client running, I can see
that client does get "something" from STDIN.
Now the weird part: if I put in the beginning of the
HHH) because I want the parent just to
spawn the child, print something into it, and exit. And that is exactly
what happens. If I look at processes I see only client running, I can see
that client does get "something" from STDIN.
Now the weird part: if I put in the beginning of the
Hi all,
ATM I am playing with cookies. I just came accross a really weird
problem I am having...
I would set the cookie in my browser and have in expire in 10 minutes.
Then I logged out of my webpage and have the cookie deleted. This
worked fine. I then logged back into my webpage and
> "Mathew" == Mathew Hennessy <[EMAIL PROTECTED]> writes:
Mathew> if (/(.*?),/) {
Mathew> $key = $1;
Mathew> }
Mathew> should be safe here, assuming 'in scalar context returns true if it
Mathew> succeeds, false if it fails.' means that false is 0 or un
"Randal L. Schwartz" wrote:
>
> > "jbarry" == jbarry <[EMAIL PROTECTED]> writes:
>
> jbarry> /(.*?),/; #pattern matching. Grabs everything up to the first comma.
> jbarry> (The material number)
> jbarry> $key = $1;
>
> NEVER use $1 unless it's in the context of a conditiona
1 - 100 of 106 matches
Mail list logo
