ib/POD2/DE/local
.cpan/build/local-lib-2.29-0/lib/local
But they are in the “build” directory. This is a little bit suspicious. Am I
missing some installation steps? Would you please help me to install
“local::lib” correctly? Thank you very much and have a wonderful day ahead!
—
Best wishes,
Ma
patient or is the advice in
the book no longer relevant? Please let me know. Thank you and have a good day
ahead!
--
Best wishes,
Maxim
Maxim Abalenkov \\ maxim.abalen...@gmail.com
+44 7 486 486 505 \\ www.maxim.abalenkov.uk
as follows
/test/playground
i need the output in following fasion
/test
/playground
can you please tell me what is wrong?
Regards
Irfan.
--
Maxim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http
]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
--
Maxim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
todo
this... I have
ideas etc.. but would like info as to a cleaner more professional way.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
, for examples, Xfree server on windows
computer.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello Gary,
Friday, January 04, 2002, Gary Hawkins [EMAIL PROTECTED] wrote:
GH How can I check whether the system is connected?
GH Want to pause the script if connection is lost.
your OS? and your connection type?
Best wishes,
Maximmailto:[EMAIL PROTECTED
problematic.
DP Are there any lightweight alternatives? Has anyone got a better way
DP to do this than uucp or had trouble getting this to work?
hmmm... what about [t]ftp?
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED
Things, which shows you, that system is NOT connected:
1. you can not reach your default gateway
2. you can not operate with your provider's DNS server(s)
addresses of gateway and DNS servers you can obtain by running
'ipconfig /all' command on Win* boxes.
Best wishes,
Maxim
this doesn't work: Prompt =
DJH '/\[$::username\@$::machine\]\$$/'.
because you do not understand difference between
'/\[$::username\@$::machine\]\$$/' and /\[$::username\@$::machine\]\$$/
try
print '/\[$::username\@$::machine\]\$$/';
print /\[$::username\@$::machine\]\$$/;
Best wishes,
Maxim
.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
usually use either read-write mode for
updating textfiles, since they have variable length records. See the
-i switch in the perlrun manpage for a better approach. - you are warned.
as usual, you can use temporary files as a i/o buffer.
Best wishes,
Maximmailto:[EMAIL
Is this
RSC something I can change under Apache (I'm running 1.3)?
hmmm... no.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
need interface to lpt port, write your own module (in C, you
call it library), in C and use them. see
'perldoc perlxs'
for more details.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
','$date1','$name'));
FJC 105
FJC 106
FJC 107 $sth2 - execute or die unable to execute query ;
FJC 108
FJC 109
FJC 110
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e
access to
users home files.
2. if you really want to do this, you should reconfigure your http
daemon. if your daemon is apache, read http://httpd.apache.org/docs-2.0/suexec.html
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED
got bad examples...
take a look at
perldoc perlipc
, which contains working client/server samples.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
(A) to $_ from (B)
$b=$_;
if $b =~ $a
CI then I'm just printing my diffs so I can correc the necessary files.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
.
take a look at sample in
perldoc -f alarm
to load page from http server, you can use lynx, of course, but i
suggest you to use perl module 'LWP'.
perldoc LWP::Simple
perldoc LWP
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED
would like to
AS print out NO EMAIL PROVIDED. How do I do this within my while loop.
AS When this report is run, it is piped to a csv file so that it can easily
AS be imported into Excel. Thanks in advance for the help.
Best wishes,
Maximmailto:[EMAIL PROTECTED
this other sub...
DF sub2();
DF } else {
DF #Continue while loop...
DF }
DF }
DF Can I make it smaller. I want to know this to improve my Perl skills.
perldoc -q switch
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL
Hello Andrew,
Wednesday, December 05, 2001, Andrew Clark [EMAIL PROTECTED] wrote:
AC The subject says it all.
AC R,
AC AJFC
AC Please CC replys, I'm not on the list.
perldoc -f require
perldoc -f use
Best wishes,
Maximmailto:[EMAIL PROTECTED
/software.html
http://www.activestate.com/
SS Also, any pointers for basic tutorials?
http://perl.oreilly.com/
http://learn.perl.org/
http://www.perl.org/
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e
-Z]+)(\d+)/ );
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
syntax.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello Michael,
Wednesday, December 05, 2001, Michael McQuarrie [EMAIL PROTECTED] wrote:
MM Maxim,
MM Correction:
MM The use strict; requires the arguments to all be quoted.
yes.
MM In the real script I am only using use strict 'vars';. This way
MM I can keep the syntax of calling the sub
as if it was a file.
Does Perl have something like that i.e. writing a Perl script which
interacts with another process?
Your help will be appreciated so much.
Yep -- there's a module on CPAN called Expect.pm. It works as you would
expect. :-)
Best wishes,
Maximmailto
be
my $_path = c:/EventLogs;
if( -d $_path )
{
chdir $_path;
unlink * or die $!;
}
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
AM By the way, Are these modules installed by default on the Perl
AM distributions?
by default - no.
AM Or, how can I tell if a module is installed or not?
something like
perl -e use Net::FTP;
if module is not installed, you'll recieve error.
AM Thanks,
AM Maxim Berlin wrote:
Hello Ahmed
`;
what do you need, exactly? trying to parse /etc/passwd?
take a look at sample in
perldoc -f split
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
: Tuesday, December 04, 2001 6:57 PM
RG Subject: Re: problem executing linux command in perl
RG chmod 0777, $r_file or die Cannot chmod $r_file: $!;
RG giving error :
RG error :Cannot chmod : no such file or directory
Best wishes,
Maximmailto:[EMAIL PROTECTED
shitty if your pass files get's to long.
so what?
open (TFH,/etc/passwd);
while( $line = TFH ) {
($user,$pass,$uid,$gid,$info,$home,$type) = split /:/, $line;
}
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED
Hello Tirthankar,
Tuesday, December 04, 2001, Tirthankar C. Patnaik [EMAIL PROTECTED] wrote:
TCP Hi Maxim,
no :) you forgot to escape backslash. but there is no difference
between \ and / slashes in path names in perl for windows.
TCP Thanks for this. I use perl on a Linux box
#How_mirror_CPAN
MP 2. The downloaded mirror should be used with the cpan module where
MP must i define the path to local mirror or how can i work with cpan and
MP local mirror
for cpan module, you can define custom site(s), like
'urllist' = [q[ftp://your.cpan.site/CPAN/] ],
Best wishes,
Maxim
days old.
Good luck all,
You're welcome to pick who you think is the winner.
you already has solution. do you want it especially in perl?
ok ;)
@result= `find . -newerct \'3 days ago\' -maxdepth 1 -exec rm \{\} \\;`;
Best wishes,
Maximmailto:[EMAIL PROTECTED
]
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
/suexec.html
too.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
) {
chomp;
if (/File Name: /) {
$name = $';
}
if (/Raw/) {
$size = $';
$size =~ s/\((Compression...*)//;
$size =~ s/size/Uncompressed Size/;
print OUTPUT $name $size \n;
}
}
Best wishes,
Maximmailto:[EMAIL PROTECTED
to
select(TO_SERVER); $| = 1; select(STDOUT);
then.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello,
looks like i'm only one from Russia (Moscow) here...
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
, \%h3);
WD sub mergehash {
WD my ( $h1, $h2, $h3) = @_;
WD foreach my $MyKey1 ( keys %{$h1} ) {
WD $h3-{$MyKey1} = $h1-{$MyKey1};
WD }
[...]
jfyi (just for your information): think about
%h3=(%h1,%h2);
Best wishes,
Maximmailto:[EMAIL PROTECTED
change it in one place and be done with it.
jwc Which brings me to my question. Unless you know a better way of doing it.
jwc How do I set global variables
take a look at
perldoc -f use
perldoc -f require
Best wishes,
Maximmailto:[EMAIL PROTECTED
.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
for that?
$nodename='node.foo.com';
$ent=gethostbyname($nodename);
where is your problem?
example:
use Socket;
use Net::hostent;
$h = gethostbyname(www.perl.com);
print name:, $h-name, address:,inet_ntoa($h-addr),\n,
Best wishes,
Maximmailto:[EMAIL PROTECTED
work when I replace $nodename with 'node.foo.com' but I
WN can't get the imputed variable to work?
perldoc -f chomp
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
?
something like
$i=-1;
do{
$i++;
chomp($value[$i] = STDIN);
} until (!$value[$i]);
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
HI everyone,
I need help with understanding what is happening when I fork a
process.Here is actual code:
#!/usr/bin/perl -w
use strict;
use Fcntl qw(:DEFAULT :flock);
use POSIX;
#use Mail::Mailer;
my ($pid);
$pid = open(HHH,| infloop);
if($pid){
print HHH bla bla \n;
}
where infloop is
Hi all,
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 I do not call close(HHH) because I want the parent just to
Hi all,
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 I do not call close(HHH) because I want the parent just to
Hi all,
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 I do not call close(HHH) because I want the parent just to
, it gives me the string OAM... Can I
JL make that a variable?
yes :)
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
if variables resides inside quotes, but don't know if this is
MP significant to bother with single quotes.
personally, i prefer '' in next case:
my $a = \$\@\^;
my $a = '$@^';
MP ps. I've always used but now my boss tells me that this is a bad thing :)
it depends :)
Best wishes,
Maxim
file in unix format.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
at full health :) (sort of humor)
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
an inplace edit:
CP perl -pi -e 's/\r//g' somescript.pl
CP Just be sure to back up the file first!
-i does backup for you ?
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
wallclock secs ( 0.22 usr + 0.00 sys = 0.22 CPU)
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
interp {
my ($arg) = @_ ;
return Hello World, $arg \n ;
}
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
; $pos -= 2048 ) {
my $buf; seek FILE, $pos, 0; read FILE, $buf, 2048;
@_ = split /^/, $buf.$chunk;
$chunk = shift if $pos;
print pop while( @_ );
}
}
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail
Until today I considered myself a novice Perl programmer, but now
JL I'm not so sure. Any help would be greatly appreciated!
please show us your code?
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands
, or am I out of luck, stuck kluging the
MS script in ksh.
if you have apache web server, take a look at suexec.
http://www.apache.org/docs-2.0/suexec.html
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e
algorythmical error.
#chdir($start) or die Unable to CD to $start: $!\n;
KJ }
chdir($start) or die Unable to CD to $start: $!\n;
KJ }
KJ close LOG;
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED
}.
perldoc perldebug
search for UsageOnly
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
'print test', and now i got
print test a;
construction. very difficult to find.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
. The contents of $variable (and
sorry, my mistake. in that case regex works correctly.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
time from your
computer? see
perldoc -f localtime
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello Rory,
Saturday, August 25, 2001, Rory O'Connor [EMAIL PROTECTED] wrote:
ROC Another quick one - how can I easily strip line break characters from a
ROC variable?
see
perldoc -f chomp
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail
for this?
in perl way, yes. something like
$a=a\nb\nc\nd\n\n\n;
$b=$/;
$a =~ s/$b//g;
alternativelly, you can take a look at
perldoc -f substr
Best wishes,
Maximmailto:[EMAIL PROTECTED]
p.s. does anyone know, why i can not write $a =~ s/$///g; ?
--
To unsubscribe, e-mail
@? what about $@?
and so on...
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
, $ERRNO
$/ is $INPUT_RECORD_SEPARATOR, $RS
$^ is $FORMAT_TOP_NAME
well, ${ unassigned now...
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
variable will be, even if you don't know the contents of that variable.
no.
CS or am I misunderstanding you?
may be.
example:
$regex=STDIN; chomp $regex;
$variable=STDIN; chomp $variable;
$a =~ s!$variable!$regex!;
any ideas?
Best wishes,
Maximmailto:[EMAIL PROTECTED
wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
( /\./, shift ) ) );
}
sub ul2ip {
return join( '.', unpack( 'C4', pack( 'N', shift ) ) );
}
(receipts stolen from russian fido7.ru.perl group)
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
/;
my $testvar = eval $generatedCode;
print testvar=$testvar;
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
information as possible with your question, not only
piece of code. it's very hard to understand, what can be wrong.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
question, but whew this one is getting to me...
well... sorry for a stupid question, but i can not see - where did you call
send_mail() sub?
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
]),
KRM td(['E-Mail', $email])
KRM ]
);
KRM }
print end_table();
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
myfile.txt to unix-like OS ($/=\n) in binary mode,
and then run your script in unix.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello Robert,
Tuesday, August 21, 2001, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:
Ric What is the best perl example of a k-shell case statement as follows:
Ric case $VAR1
Ric in
take a look at Basic BLOCKs and Switch Statements in
perldoc perlsyn
Best wishes,
Maxim
://search.cpan.org/doc/ERYQ/MIME-Lite-2.111/lib/MIME/Lite.pm
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
-type : text/html
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
else { die Error: can't create directory $dir, a
pn directory of that name al
pn ready exists\n; }
pn } else {
pn mkdir $dir, 0755;
pn }
pn }
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e
{'REMOTE_ADDR'};
MN }
MN if ($ENV{REMOTE_HOST}) {
if ($ENV{'REMOTE_HOST'}) {
MN $location = $ENV{REMOTE_HOST};
$location = $ENV{'REMOTE_HOST'};
MN }
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
(perldoc -f stat).
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
will have problems with new
modules which you will install - you will need win32 C compiler.
decision is yours.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
close(FICHIER);
CFFDT close(TEMP);
CFFDT }
CFFDT closedir LMI;
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
of lines to be in place when i ftp the file over to a win system.
again, it's not your job. you should switch ftp to ascii mode, and
then transfer your text files.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional
];
}
see perldoc perlref for more.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
binmode
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello Jennifer,
Thursday, July 26, 2001, Maxim Berlin [EMAIL PROTECTED] wrote:
MB $boolean = grep /AF1/,@mylist;
sorry, incorrect sample. should be:
$boolean = grep /^AF1$/,@mylist;
with first regexp you catch every string, that contain 'AF1'.
thanks to Mooney Christophe.
Best
}
JP is there a more elegant way to do it?
$boolean = grep /AF1/,@mylist;
perldoc -f grep
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
, $minute, $second, $frame, $crap1, $crap2, $crap3, $crap4) =
G split(/:/,$line);
(if i correctly understand you) try
split(/[: ]/,$line);
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
.
if you need to send email(s), take a look at Net::SMTP module.
perldoc Net::SMTP
if you have it already installed, or
http://search.cpan.org/doc/GBARR/libnet-1.0703/Net/SMTP.pm
otherwise.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL
Use of uninitialized value in split at c:/Perl/site/lib/Net/Domain.pm line
ND 219.
looks like your perl installation damaged. try to reinstall.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
I am doing wrong. The module test will print out my name, but
I cannot get
JP my script to print out my name.
JP Any ideas?
do
use strict;
in your scripts.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional
use pointer.
see
perldoc perlref
for more information.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
) and ($s_port ne nameserver))
{
}
D:\tempperl -cw t.pl
t.pl syntax OK
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
Any suggestions???
please show your source.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
(see time::local and localtime), then
substract, and then convert result back to date.
Best wishes,
Maximmailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
| perl format.pl
JP it never worked
what OS do you use? script works well on my freebsd.
JP it always die cannot open $LINE.
please show me output, exactly how your script produced.
JP I don't understand why
me too :)
Best wishes,
Maximmailto:[EMAIL PROTECTED]
1 - 100 of 125 matches
Mail list logo