Hi,
Does SciTE allow you send the $(CurrentSelection) into STDIN pipe of
your script?
Example: system echo $(CurrentSelection) | perl yourscript
Thanks.
Ee Wah
http://www.kopi-putih.blogspot.com
On 4/2/08, Karl Anderson [EMAIL PROTECTED] wrote:
Thank you,
Passing it as a file would be
Hi Dan
Use $frames{$ticket}{Label}-destroy instead
EeWah
On 2/11/08, Daniel Burgaud [EMAIL PROTECTED] wrote:
Hi
I created some Label and Button using the following:
$frames{$ticket}{'main'} = $TOP-Frame(
-width = 250,
-height = 60,
-borderwidth =
You can have a look on this module.
http://search.cpan.org/~lusol/Tk-ExecuteCommand-1.6/ExecuteCommand.pm
On 8/26/07, Jerry Kassebaum [EMAIL PROTECTED] wrote:
I add this line: ; to my code, so that the user has to hit ENTER to
continue or end the program.
Or I just open a DOS so I can see
It counts the number of occurances of all lines in a file until a directive
BREAK.
a
v
b
a
a
BREAK
-
Then, $seen{a} = 3; $seen{v} = 1; $seen{b} = 1;
On 8/11/07, Todd Beverly [EMAIL PROTECTED] wrote:
Mark Funk wrote:
What exactly does the following Perl code do?
%hash=();
Hi, I think you should escape that period and dash as well.'^[a-zA-Z0-9-_. \[\]]+$''^[a-zA-Z0-9\-_\. \[\]]+$'or may be simpler:'^[\w\d_\-\. \[\]]+$'
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe:
I think you can try the Benchmark module. Like:
use Benchmark qw(:all) ;
$line = ABCDEFGHIJKLMNOPQRSTUVWXYZ'; $r = timethese(100, { 'CASE 1' = sub { $line =~ /\w*\w*\w*/; },
'CASE 2' = sub { $line =~ /\w/g; }, });Good Luck!
From: "Robert Killheffer" [EMAIL PROTECTED]To:
