I am programmer and work with language VB. But I have some doubts about
Perl
and in the internet I did not find solutions.
I like to know if is possible to use dll's I writed (that access a usb
scanner) in perl. If I could, how can i referenciate it (in vbscript we use
the CreateObject method)?
On Dec 1, 2003, at 6:19 AM, Na wrote:
I am programmer and work with language VB. But I have
some doubts about Perl and in the internet I did not find solutions.
I like to know if is possible to use dll's I writed (that access a usb
scanner) in perl. If I could, how can i referenciate it (in
Hi everyone,
Can anyone tell me what the following piece of code does :
my $cur_dir = cwd ();
if ($cur_dir =~ m, ^/.*/ (.*)/xyz,) {
}
Thanks,
hari
-
Do you Yahoo!?
Free online calendar with sync to Outlook(TM).
PROTECTED]
Subject: A Doubt on Regular Expression
Hi everyone,
Can anyone tell me what the following piece of code does :
my $cur_dir = cwd ();
if ($cur_dir =~ m, ^/.*/ (.*)/xyz,) {
}
Thanks,
hari
-
Do you Yahoo!?
Free online calendar with sync to Outlook(TM
Hi all,
i have a set if keywords which i have to search for in the lines
beginning with character 'A' in the file.
snippet follows -
#!/usr/bin/perl -w
$keywords = hello|world|all|chipset;
open FH,file;
while(FH)
{
print if(/^A/ /(?:$keyword)/g);
}
close FH;
is that correct or any other
[EMAIL PROTECTED] wrote:
Hi all,
i have a set if keywords which i have to search for in the lines
beginning with character 'A' in the file.
snippet follows -
#!/usr/bin/perl -w
$keywords = hello|world|all|chipset;
open FH,file;
while(FH)
{
print if(/^A/ /(?:$keyword)/g);
print
hi friends,
i have a problem in work i want to use a variable in the place of pattern to be
matched, but i don't know how? but some great brain some ware in the world will be
knowing it.
hear i explain the program, when i use the patter i get the right output when i store
it in variable t
Kasi ramanathen wrote:
hi friends,
i have a problem in work i want to use a variable in the place of
pattern to be matched, but i don't know how? but some great brain
some ware in the world will be knowing it.
hear i explain the program, when i use the patter i get the right
output when i
and use it no output comes help me?
open (H, st.htm);#open html file
@a=H;
$ln=join('',@a);#store the content in a variable
$t=perl;
while($ln=~m/$t/g)#search the world perl in the html file
#my doubt is hear the code doesn't work when i use the vaiable t it work's when i use
the word perl instoud
kasi ramanathen wrote:
$t=perl;
while($ln=~m/$t/g)
{
print it matches..;
}
Hi Kasi,
The part above shoul;d work, because this does:
#!/usr/bin/perl -w
use strict;
my $Test = Hi;
my $Greeting = Hi, there. How are you?;
if ($Greeting =~ /$Test/) {
print $Greeting\n;
} else {
dear friends:
i have a simple doubts in reguler exepration see the the passage that follows is
stored in a variable by name v. in the fifth line see the words like this Next 20 ^
now i want delete all the charecter before ^- sign in my variable v.
shall i use find and replace to find all the
dear friends:
Howdy
i have a simple doubts in reguler exepration see the the
passage that follows is stored in a variable by name v. in
the fifth line see the words like this Next 20 ^ now i
want delete all the charecter before ^- sign in my variable v.
shall i use find and replace
$str='a
href=Java.Sun.com'http://srd.yahoo.com/S=2766679:WS1/R=1/K=java/SS=79559/OCS=79428/H=0/T=1043090181/F=641685fa5455462d4f69450a6fd72ecc/*http://java.sun.com/;bJava/b.Sun.com/a/big';
if($str=~/a href=[\w\W]*[\w\W]*(\W)/)
{
print $1;
print \n***\n;
}
the output of the programe is
/
Kasi ramanathen wrote:
$str='a
href=Java.Sun.com'http://srd.yahoo.com/S=2766679:WS1/R=1/K=java/SS=79
559/OCS=79428/H=0/T=1043090181/F=641685fa5455462d4f69450a6fd72ecc/*http:
//java.sun.com/bJava/b.Sun.com/a/big';
if($str=~/a href=[\w\W]*[\w\W]*(\W)/) {
print $1;
print \n***\n;
}
It's very
i'm to update a pearl programme using mysql, i know only less of the latter. i come
across a statement
$ver=$dbh-prepare(SELECT jobid, pid from jobs where exectime?');
now i want to know the perpose of ?' these charecters in the above statement
Catch all the cricket action. Download Yahoo!
From: kasi ramanathen [EMAIL PROTECTED]
i'm to update a pearl programme using mysql, i know only less of the
latter. i come across a statement
$ver=$dbh-prepare(SELECT jobid, pid from jobs where exectime?');
now i want to know the perpose of ?' these charecters in the above
statement
hi
i have a prog which should create a file according to the date and name
it $date.log and write something depending upon other things in it!
Here is the code.. which refuses to work
any clues.. ?
TIA
pravesh
--
#!/usr/bin/perl -w
.--[ Pravesh Biyani wrote (2002/11/12 at 17:49:14) ]--
|
| hi
| i have a prog which should create a file according to the date and name
| it $date.log and write something depending upon other things in it!
| Here is the code.. which refuses to work
|
| any clues.. ?
|
--- Pravesh Biyani [EMAIL PROTECTED] wrote:
i have a prog which should create a file according to the date
and name it $date.log and write something depending upon
other things in it! Here is the code.. which refuses to work
any clues.. ?
$prefix_file = ` date '+%x' ` ;
according to
| $probefile = probe.log ;
| $OUTFILE = $probe_logfile;
| open(probefile) or die(ERROR: $! \n);
| open(OUTFILE) or die (ERRROR :$! \n);
You're not using open() correctly. You need to have something
along the lines of:
open(PROBE, $profile);
open(OUT, $OUTFILE);
thanks verymuch.. the prgm working fine now!!
cheers
pravesh
Frank Wiles wrote:
.--[ Pravesh Biyani wrote (2002/11/12 at 17:49:14) ]--
|
| hi
| i have a prog which should create a file according to the date and name
| it $date.log and write something depending upon other things
Pravesh Biyani wrote:
hi
Hello,
i have a prog which should create a file according to the date and name
it $date.log and write something depending upon other things in it!
Here is the code.. which refuses to work
--
At 12:04 AM 10/26/2002 +0200, Jenda Krynicky wrote:
From: Robert Citek [EMAIL PROTECTED]
This sounds like something that perl should be able to handle by
changing the locale so that you do not have to alter the source file.
I hope NOT! This would break tons of modules!
Perhaps. But then
From: Robert Citek [EMAIL PROTECTED]
At 12:04 AM 10/26/2002 +0200, Jenda Krynicky wrote:
From: Robert Citek [EMAIL PROTECTED]
This sounds like something that perl should be able to handle by
changing the locale so that you do not have to alter the source
file.
I hope NOT! This would
, $cc;
Output:
1.0101 2.20202 3.21212
Wags ;)
-Original Message-
From: Cleiton L. Siqueira [mailto:cleiton;colegiomonjolo.com.br]
Sent: None
To: [EMAIL PROTECTED]
Subject: Stupid doubt!
Dear,
I've tried to add two variables, but the result isn't right.
Because when Perl add the both
Dear,
I've tried to add two variables, but the result isn't right.
Because when Perl add the both it removes the decimal numbers from the each variable.
How can I add these variables in perl?
Thanks,
Cleiton L. Siqueira
Colégio Monjolo
[EMAIL PROTECTED]
(0xx45) 520-1915
Esta
Hello Cleiton,
At 01:32 PM 10/25/2002 -0700, Cleiton L. Siqueira wrote:
I've tried to add two variables, but the result isn't right.
Because when Perl add the both it removes the decimal numbers from the
each variable.
How can I add these variables in perl?
Does this one-liner work on your
Dear,
Thanks for your help!!!
I was making a mistake with my source file. My file has numbers like this 2,25. Perl
uses . and not , to decimal numbers.
I changed the . to , in the file and now it's working well.
Sorry, for my stupid question!!!
And Thanks for your attention and answers.
Hello Cleiton,
At 02:36 PM 10/25/2002 -0700, Cleiton L. Siqueira wrote:
Thanks for your help!!!
No problem.
I was making a mistake with my source file. My file has numbers like
this 2,25. Perl uses . and not , to decimal numbers.
I changed the . to , in the file and now it's working well.
From: Robert Citek [EMAIL PROTECTED]
At 02:36 PM 10/25/2002 -0700, Cleiton L. Siqueira wrote:
I was making a mistake with my source file. My file has numbers like
this 2,25. Perl uses . and not , to decimal numbers. I changed
the . to , in the file and now it's working well.
This sounds
Hi,
Its me again..
169b2_vow_band_1.fea
2168d6_vow_band_1.fea
@files = grep /^.{3}g[^1].*\.fea$/, @files;
can i have an or like for eg :
@files = grep /^.{3|4}g[^1].*\.fea$/, @files;
Many Thanks
Mandar
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
Mandar Rahurkar wrote:
Hi,
Its me again..
169b2_vow_band_1.fea
2168d6_vow_band_1.fea
@files = grep /^.{3}g[^1].*\.fea$/, @files;
can i have an or like for eg :
@files = grep /^.{3|4}g[^1].*\.fea$/, @files;
You can write it as /^.{3,4}g(?!1).*\.fea$/
.{3,4} matches atleast 3
I am using following regexp :
$skip=1;
@list_neutral=grep /^.{3,4}[^d][^skip].*\.fea$/, @list;
this does not match as 3|4 option matches everything :(
Mandar
On Wed, 3 Apr 2002, Sudarsan Raghavan wrote:
Mandar Rahurkar wrote:
Hi,
Its me again..
169b2_vow_band_1.fea
Here the doubt,
I have a Form with some radio and checkbox groups in it. when
the user fillout the form and then hit the Submit button a perl
program is invoke depending on how the user fill. if i want to
know all of the field names and values that have the form i do
this:
foreach my $name
--- [EMAIL PROTECTED] wrote:
Here the doubt,
I have a Form with some radio and checkbox groups in it. when
the user fillout the form and then hit the Submit button a perl
program is invoke depending on how the user fill. if i want to
know all of the field names and values that have
name=index.cgi
input type=text name=custname value=ENTER YOU NAME
input type=text name=custphone value=Enter Your Phone
/FORM
-Brian
Here the doubt,
I have a Form with some radio and checkbox groups in it. when
the user fillout the form and then hit the Submit button a perl
program
Hello,
My doubt is How do you identify whether a perl scalar variable
contains a numeric value or alphanumeric string? . I had gone
through theexplanation available atthe URL
http://www.cpan.org/doc/FMTEYEWTK/is_numeric.html , but I didn't
]'
Subject: Doubt
Hello,
My doubt is How do you identify whether a perl scalar variable
contains a numeric value or alphanumeric string? . I had gone
through theexplanation available atthe URL
http://www.cpan.org/doc/FMTEYEWTK/is_numeric.html , but I
On Thu, 30 Aug 2001, Rajanikanth Dandamudi wrote:
My doubt is How do you identify whether a perl scalar variable
contains a numeric value or alphanumeric string? . I had gone
through theexplanation available atthe URL
http://www.cpan.org/doc
had gone through the link
(http://www.stonehenge.com/merlyn/UnixReview/col30.html) given by you which
clearly explains the difference between deep copy and shallow copy. Also, I
understood the difference between deepcopy and shallow copy. But, the doubt I
raised is a different one. My question
Hello,
I had got a doubt about the perl module
Storable.pm . Incase
someone is not aware of what Storable.pm
is please enter the
following command( on aunix
machine)at the command
prompt. Command to be entered is perldoc
Storable.pm (with out
(search.cpan.org, ftp.cpan.org)
to grab the latest version.
Hope this helps,
C.J.
On Thu, 12 Jul 2001, Rajanikanth Dandamudi wrote:
Hello,
I had got a doubt about the perl module
Storable.pm . Incase
someone is not aware of what Storable.pm
is please enter the
following
Hello,
I had seen some of the perl files starting with the
line :
eval 'exec perl $0 -S ${1+$@}'
and here is where I got the doubt.
--
Thanks and Regards,
D.Rajanikanth
Jeff Yoak wrote:
At 02:16 PM 6/8/01 +0530, Rajanikanth Dandamudi wrote:
Hello,
I had a problem
On Fri, 8 Jun 2001, Rajanikanth Dandamudi wrote:
Hello,
I had seen some of the perl files starting with the
line :
eval 'exec perl $0 -S ${1+$@}'
and here is where I got the doubt.
MakeMaker usually inserts the line into perl executables when they are
installed. On some systems
[EMAIL PROTECTED] schrieb am 2001-05-31, 18:30:
Hi gurus,
In http://www.cpan.org/doc/FMTEYEWTK/is_numeric.html, ( Is it a
number? ), Tom Christiansen writes:
--
If you do care about getting
Hi gurus,
In http://www.cpan.org/doc/FMTEYEWTK/is_numeric.html, ( Is it a
number? ), Tom Christiansen writes:
--
If you do care about getting 0's, then do this:
do {
print
[EMAIL PROTECTED] wrote ..
In http://www.cpan.org/doc/FMTEYEWTK/is_numeric.html,
( Is it a number? ), Tom Christiansen writes:
---
If you do care about getting 0's, then do this:
do {
print Number, please: ;
$answer =
At 11:32 AM 5/31/01 +1000, King, Jason wrote:
I notice that the copyright notice is 1996 .. so perhaps my memory is
failing me and that there was a version of Perl where STDIN did NOT grab
the line-ending character as well .. otherwise Tom really is human and has
made a mistake :)
I would peg it
Gurus,
perldoc perlvar says:
$digits
Contains the subpattern from the corresponding set
of parentheses in the last pattern matched, not
counting patterns matched in nested blocks that have
been exited already. (Mnemonic: like
this:
$firstmatch = $foo =~ /(bar)/;
Hope that helps,
Jos Boumans
- Original Message -
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, May 17, 2001 6:59 PM
Subject: doubt about $digits in perldoc perlvar
Gurus,
perldoc perlvar says:
$digits
On May 17, [EMAIL PROTECTED] said:
$digits
Contains the subpattern from the corresponding set
of parentheses in the last pattern matched, not
counting patterns matched in nested blocks that have
been exited already. (Mnemonic: like
101 - 151 of 151 matches
Mail list logo