hi,
i'm new to perl and i want to know if perl has reflection like java?
how can i acces reflection and how powerfull is the reflection in perl?
thx mseele
--
G & H Softwareentwicklung GmbH Tel.: +49(0)7451/53706-20
Robert-Bosch-Str. 23 Fax: +49(0)7451/53706-90
D-72160 Horb a.N.
Hi
Please anyone help me in Reg Exp. I wanted to replace "[%one_two%]" and "[%pne%]" with
the value "New" say...
I wrote the following code...I am unable to get the output as
"This is a test for New number and New numbers."
I am getting it as
"This a test for New numbers." WHICH IS WRONG...
P
Hello,
I am curious to know that if that is an existed module to open files with it's default
application just like I
double click on the file with mouse. and I do something just like this with my code :
use defaultOpen;
defOpen 'C:\temp.gif' or die "$!" ; # Then the image will open with photos
John W. Krahn wrote:
You may be able to do this by using a tied hash which will actually
store the hash's contents in a file.
perldoc DB_File
perldoc AnyDBM_File
perldoc perldbmfilter
Tied hashes look fairly complicated to me, but i'll give them a try ;)
>
> #Print hash sorted by Host-IP-Adress
Within single quotes "[" is not considered as a special character.
So,it's a mess trying to escape this character with backslash "\".
So,your code expects \[%one_two%\] instead of [%one_two%].
On Thu, 7 Oct 2004, Anish Kumar K. wrote:
> Hi
>
> Please anyone help me in Reg Exp. I wanted to r
On Thu, Oct 07, 2004 at 11:28:44AM +0200, Michael Seele wrote:
> i'm new to perl and i want to know if perl has reflection like java?
> how can i acces reflection and how powerfull is the reflection in perl?
You might want to narrow this down a bit to get real information, but:
http://java.sun.c
Anish Kumar K. wrote:
Hi
Please anyone help me in Reg Exp. I wanted to replace "[%one_two%]" and "[%pne%]" with the value
"New" say...
I wrote the following code...I am unable to get the output as
"This is a test for New number and New numbers."
I am getting it as
"This a test for New numbers." WH
This is an example of perl regular expression greediness.
check 'perldoc perlre' and search for "greediness".
You might want to use something like
s/$openTag.*?$closeTag/New/g
the extra '?' does not mean what you think it means when it follows a + or a *
:-)
Sorry for the top post.
On Thu,
Search for a program called 'shellexec'. (use google).
Shellexec does exactly what you want, but its a windows executable, so
instead of calling
defopen "something";
try
system("shellexec something");
you should be able to download shellexec or an equivalent from many places.
As for portable
Hi All,
I came across this excellent module X11::GUITest , by which I can send
inputs to X applications. My problem is I am not able to send special
keys like HOME END etc
Is there a way by which I can sendkeys using the keycode
Thanks
Ram
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For a
Thanks a lot for the mail...
I have one more to clarify...The line you specified
s/$openTag.*?$closeTag/New/g;
searches and replaces the tags with the word "New" fine..
My questions is if there is a line like
$_= "This is a test for [%one_two%] number and [%pne%] numbers.";
Is there in perl any
Wow !! As you mentioned, thaz EXACTLY what I want :-))
Thousands Thanks !!!
Bee
- Original Message -
From: "David le Blanc" <[EMAIL PROTECTED]>
To: "Bee" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Thursday, October 07, 2004 7:11 PM
Subject: Re: Open file with default application
All,
I have a Perl script I am running from an HTML page that will save the output
in a file called comments.txt. Is there anyway I can email this file everytime to an
email address that I provide. This will be running on a Windows platform. Also, if
you have better suggestions for w
Hi
First :
I want to find the file Normal.dot on any computer (the users names
differ) How can I find the file in any tree or directory.
Second :
I want to delete the normal.dot and replace it with the normal.dot that
I made.
Help will be appreciated
Thanx
Hi
First :
I want to find the file Normal.dot on any computer (the users names
differ) How can I find the file in any tree or directory.
Second :
I want to delete the normal.dot and replace it with the normal.dot that
I made.
Help will be appreciated
Thanx
Ok, I have a "sane compiler" toolset installed on my development server, but
NOT on several servers on which I want Perl. (Where the development and
production servers are the same architecture.)
Can I build & install Perl on my development server, and then just
distribute it as a tarball to the
Bee wrote:
> Hello,
>
> I am curious to know that if that is an existed module to open files
> with it's default application just like I double click on the file
> with mouse. and I do something just like this with my code :
>
> use defaultOpen;
> defOpen 'C:\temp.gif' or die "$!" ; # Then the i
Thanks thanks, a very nice lesson again !! Feel quite sorry that I even
never heard about this command for using windows after so many
years...
Thousands thanks,
Bee
- Original Message -
From: "Bob Showalter" <[EMAIL PROTECTED]>
To: "'Bee'" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Hi Anish,
.* always tries to match as much as possible.
So the code you have sent takes the first [% and the last %] and
replaces everything in between.
If the contents in between the openTag and the closeTag is ONLY "word
characters" (i.e., _, 0-9, a-z, A-Z) then you may change the regEx to
s
> differ) How can I find the file in any tree or directory.
perldoc -m File::Find
perldoc -f glob
perldoc -f opendir
perldoc -f readdir
>
> Second :
> I want to delete the normal.dot and replace it with the normal.dot that
perldoc -f unlink
perldoc -m File::Copy
HTH,
Bee
--
To u
Hi Perl Mongers,
I need to configure the CPAN module to use gcc (which I've installed).
Whenever I run:
# perl -MCPAN -e 'install Bundle::CPAN;'
the CPAN module automatically uses the cc that is in my /usr/ucb/
directory. (I'm running Solaris 9 on Sun hardware). I tried adding
the following li
From: "Bee" <[EMAIL PROTECTED]>
> I am curious to know that if that is an existed module to open files
> with it's default application just like I double click on the file
> with mouse. and I do something just like this with my code :
>
> use defaultOpen;
> defOpen 'C:\temp.gif' or die "$!" ; # Th
From: "Karl Kaufman" <[EMAIL PROTECTED]>
> Ok, I have a "sane compiler" toolset installed on my development
> server, but NOT on several servers on which I want Perl. (Where the
> development and production servers are the same architecture.)
>
> Can I build & install Perl on my development serve
From: Steve <[EMAIL PROTECTED]>
> I am not sure what the best way to tackle this problem so here it
> goes...
>
> I want to use the user's input to replace a string value in the
> registry. The problem is locating the subkey. There is one location
> that I need to change the string value:
>
> \
Hi
This is what I'm using to find the file. .I still can't delete the
file or replace it with the file I created.
Help pls Thanx
se strict;
use File::Find;
use CGI qw(:standard);
my $query = param("Toetsss");
undef $/;
find( sub
{
return if($_ =~ /^\./);
return unless($_ =~ /Toetsss.txt
On Thu, 07 Oct 2004 16:10:29 +0200, Jenda Krynicky <[EMAIL PROTECTED]> wrote:
> From: "Bee" <[EMAIL PROTECTED]>
> > I am curious to know that if that is an existed module to open files
> > with it's default application just like I double click on the file
> > with mouse. and I do something just lik
Anish Kumar K. wrote:
My questions is if there is a line like
$_= "This is a test for [%one_two%] number and [%pne%] numbers.";
Is there in perl any operator which will help me to take the
variable names separately like...
one_two
pne
I already helped you with this problem yesterday. Didn't you see
K.Prabakar wrote:
Anish Kumar K. wrote:
$openTag='\[%';
$closeTag='%\]';
my $count=0;
$_= "This is a test for [%one_two%] number and [%pne%] numbers.";
s/$openTag.*$closeTag/New/g;
Within single quotes "[" is not considered as a special character.
So,it's a mess trying to escape this character with
Folker Naumann wrote:
John W. Krahn wrote:
This may work as it doesn't slurp the whole file(s) into memory:
use warnings;
use strict;
use Socket;
my %ipload;
{ local @ARGV = @sortlist;
while ( <> ) {
next unless / (\d+\.\d+\.\d+\.\d+) \w*\/\w* (\d+) [A-Z]+/
my $ip = inet_aton(
> -Original Message-
> From: Jenda Krynicky [mailto:[EMAIL PROTECTED]
> Sent: Thursday, October 07, 2004 4:10 PM
> To: [EMAIL PROTECTED]
> Subject: Re: Open file with default application software on Windows ?
>
>
> From: "Bee" <[EMAIL PROTECTED]>
> > I am curious to know that if that i
>
> I have a Perl script I am running from an HTML page
> that will save the output in a file called comments.txt. Is
> there anyway I can email this file everytime to an email
> address that I provide. This will be running on a Windows
> platform. Also, if you have better suggestion
Charlene Gentle wrote:
Hi
Hello,
This is what I'm using to find the file. .I still can't delete the
file
perldoc -f unlink
or replace it with the file I created.
perldoc File::Copy
se strict;
use File::Find;
use CGI qw(:standard);
my $query = param("Toetsss");
undef $/;
find( sub
{
return if
>
> This is what I'm using to find the file. .I still can't delete the
> file or replace it with the file I created.
>
> Help pls Thanx
>
> se strict;
> use File::Find;
> use CGI qw(:standard);
> my $query = param("Toetsss");
> undef $/;
>
> find( sub
> {
> return if($_ =~ /^\./);
> re
From: "NYIMI Jose \(BMB\)" <[EMAIL PROTECTED]>
> > -Original Message-
> > From: Jenda Krynicky [mailto:[EMAIL PROTECTED]
> > The system('start file.doc') only allows you to trigger the default
> > action defined for the file type. If you want to use the other
> > actions you might like
COUNTERMAN, DANIEL (CONTRACTOR) wrote:
> All,
>
> I have a Perl script I am running from an HTML page that will save
> the output in a file called comments.txt. Is there anyway I can
> email this file everytime to an email address that I provide.
Be forewarned: this kind of thing tends to
> > > From: Jenda Krynicky [mailto:[EMAIL PROTECTED]
> > > The system('start file.doc') only allows you to trigger the default
> > > action defined for the file type. If you want to use the other
> > > actions you might like use Win32::FileOp qw(ShellExecute);
> > > ShellExecute 'Print' => 'c:\temp
> -Original Message-
> From: Jenda Krynicky [mailto:[EMAIL PROTECTED]
> Sent: Thursday, October 07, 2004 6:14 PM
> To: [EMAIL PROTECTED]
> Subject: RE: Open file with default application software on Windows ?
>
>
> From: "NYIMI Jose \(BMB\)" <[EMAIL PROTECTED]>
> > > -Original Mess
Hello,
Can anyone recommend a Tcl/Tk training in DC/MD/VA?
I am specifically looking for a course in intermediate to advance Tcl/Tk
(including namespaces, packages, and GUI appearance).
Thanks.
__
William Ampeh (x3939)
Federal Reserve Board
--
To unsubscribe, e-mail: [E
On Thu, 7 Oct 2004 [EMAIL PROTECTED] wrote:
Can anyone recommend a Tcl/Tk training in DC/MD/VA?
Can anyone on a global list for Perl beginners suggest local information
for Tcl/Tk training ?
No, probably not. But good luck to ya !
--
Chris Devers
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
I have a captured file that is in a odd format. I can use the Linux
strings command to parse all the information I need. The problem is
that it requires a file as input. I am looking for the same
functionality that strings gives me, but in a filter. I want to just
pipe the output of my captured
On Thu, Oct 07, 2004 at 01:20:47PM -0400, Cockerham, John (US SSA) wrote:
> I have a captured file that is in a odd format. I can use the Linux
> strings command to parse all the information I need. The problem is
> that it requires a file as input. I am looking for the same
> functionality tha
thanks Chris, for correcting syntax.
the scenario is:
operating system: Linux
phone line is normal phone we use in our homes.
I have a list of phone numbers in a spredsheet file(e.g *.xls) pick up
number from there and automatically dial to that number through phone.
I am new to Perl thats why i p
On Thu, 7 Oct 2004, Adam Saeed wrote:
the scenario is:
operating system: Linux
phone line is normal phone we use in our homes.
I have a list of phone numbers in a spredsheet file(e.g *.xls) pick up
number from there and automatically dial to that number through phone.
I am new to Perl thats why i p
Greetings,
Encountering some unexpected behavior illustrated in the
code snippet below.
In the first foreach loop
Seems like when I check for a match between
gid306 and the contents of the the ACTIVES array
I get an erroneous hit.
But as shown in the second foreach loop
if I remove gid and just
thanks again for quick reply Chris,
I want to built a opensource utility for telemarketers. i.e they have
a list of hundreds of numbers they have to dail, for windows there
exists a commercial software, but for linux i do not know any, so i
want to built it for linux so that linux users could also
Mr. John Kent wrote:
Encountering some unexpected behavior illustrated in the code
snippet below.
In the first foreach loop Seems like when I check for a match
between gid306 and the contents of the the ACTIVES array I get an
erroneous hit.
Is this a bug in Perl or in my understanding?
You missed
On Thu, 7 Oct 2004, Adam Saeed wrote:
I want to built a opensource utility for telemarketers.
Ahh, I see.
Well, I'm fresh out of ideas in that case.
Good luck, and let us know how it goes! :-)
--
Chris Devers
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROT
Kent, Mr. John (Contractor) wrote:
Greetings,
Hello,
Encountering some unexpected behavior illustrated in the
code snippet below.
In the first foreach loop
Seems like when I check for a match between
gid306 and the contents of the the ACTIVES array
I get an erroneous hit.
But as shown in the secon
Kent, Mr. John (Contractor) wrote:
...
> my(@ACTIVE) = qw {gid240 gid278 gid301};
> my(@LOGGED) = qw {gid306 gid240 gid278 gid301};
>
> # This doesn't work, finds a match for every item in
> # LOGGED, seems to be matching on "gid" but ignoring the number
> foreach (@LOGGED){
> unless (grep /$
On Thu, 7 Oct 2004 15:52:14 -0400 (EDT), Chris Devers <[EMAIL PROTECTED]> wrote:
> On Thu, 7 Oct 2004, Adam Saeed wrote:
>
> > I want to built a opensource utility for telemarketers.
>
> Ahh, I see.
>
> Well, I'm fresh out of ideas in that case.
>
> Good luck, and let us know how it goes! :-)
>
On Fri, 8 Oct 2004 03:53:55 +0600, Adam Saeed <[EMAIL PROTECTED]> wrote:
> Hi Errin!
> good tracking...!
> lema hee hee.. i am in Pakistan...It would be a nice thing but.,
> phone calls will cost you $.
> It would be a reasonable approach. if some others also want to work on
> this proj
I have a Perl script running on Windows that functions as a wrapper to a second
program -- a compiled executable I cannot change. Within my Perl script, I use
'system' to call the second program and wait for it to return -- pretty basic.
However, the second program calls ExitWindows() when it ev
Hi,
I would like to use SOAP::Lite to communicate with the web server, but I
need to send the token to get the access. Does anyone know how to set up in
SOAP::Lite? I have the following code, but I get the errorcode 1001,
"Request must have exactly one security token" message back. Does anyone
giv
Thanks for the reply, Jenda.
(OS/arch is Solaris8/Sparc)
The difficulty will be knowing exactly which files were added by a module
install -- if I want to distribute per module. Otherwise, I guess I can
just roll the updated site_perl directory structure. Yes?
- Original Message -
Fr
Hi,
I would like to use SOAP::Lite to communicate with the web server, but I
need to send the token to get the access. Does anyone know how to set up in
SOAP::Lite? I have the following code, but I get the errorcode 1001,
"Request must have exactly one security token" message back. Does anyone
giv
On 10/7/2004 2:43 PM, Karl Kaufman wrote:
Thanks for the reply, Jenda.
(OS/arch is Solaris8/Sparc)
The difficulty will be knowing exactly which files were added by a module
install -- if I want to distribute per module. Otherwise, I guess I can
just roll the updated site_perl directory structure.
56 matches
Mail list logo
