Real simple,
I have a string, $a for arguments sake, that contains a single
word. The word will always have exactly 8 characters in it, most likely
something like ABCD1234. I need to split this up into two strings ($b
$c), the first string needs to contain all the characters before the
$Bill Luebkert wrote:
Lyle Kopnicky wrote:
No, it's a rackmount server, they tend not to have these things. But
now I'm using an ICA session, and if I open a browser, and view flash
files, I get sound. I get sound when I log into the server. But I don't
get those beeps.
The normal
[EMAIL PROTECTED] wrote:
Real simple,
I have a string, $a for arguments sake, that contains a single
word. The word will always have exactly 8 characters in it, most
likely something like ABCD1234. I need to split this up into two
strings ($b $c), the first string needs to contain
Title: Returning to a Worksheet where a hyperlink was used - in Excel with Win32::OLE
Hi Folks,
We have a set of Excel Workbooks that are constructed by Perl Win32::OLE scripts. The Workbooks consist of reports in the form of Worksheets. Each Worksheet has a column of Hyperlink Objects
The normal beep that you get when you do ^G is from the speaker inside
the case of your PC. With a rackmount, you may be getting a beep, but
not be able to hear it since it's coming from the case in the rack (if
it even has a speaker).
Apparently what you need to do is get the PC or
Interestingly, MessageBeep() doesn't work on my XP machine but Beep() does.
use strict;
use Win32::API;
my $msgBeep = Win32::API-new('user32', 'MessageBeep', 'N', 'N') or
die Can't create a beep function: $^E\n;
my $beep= Win32::API-new('kernel32', 'Beep', 'NN', 'N') or die
Can't create a
On 5/1/06, Ng, Bill [EMAIL PROTECTED] wrote:
Real simple,
I have a string, $a for arguments sake, that contains a single
word. The word will always have exactly 8 characters in it, most likely
something like ABCD1234. I need to split this up into two strings ($b
$c), the first string
The normal beep that you get when you do ^G is from the speaker inside
the case of your PC. With a rackmount, you may be getting a beep, but
not be able to hear it since it's coming from the case in the rack (if
it even has a speaker).
Apparently what you need to do is get the PC or
How about something like this?
#Check the length
unless(length($myScalar) != 8){
die(Bad Scalar! Bad!\n);
}
#Get the parts
if($myScalar =~ /^([^0-9]*)(\d+.*)$/ ){
print $1 $2\n;
}
NOTE: NEVER name your variable $a. $a
Title: Returning to a Worksheet where a hyperlink was used - in Excel with
Win32::OLE
I cant test
this, but have you tried Alt + ?
From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Glen Plantz
Sent: Monday, May 01, 2006 1:47 PM
To:
Lyle Kopnicky wrote:
$Bill Luebkert wrote:
[snipped stuff about using an ICA session and not getting beeps]
Apparently what you need to do is get the PC or whatever you are logging
in from to generate the beep rather than the MB speaker.
I can do that, by typing ^G in the console and
Hello List,
I am looking for information on using Perl with Excel spread-sheets.
I have found several articles on the subject, but not a book.
Is anyone aware of a good book on using Perl with Excel(to
create and maintain excel fields and spread-sheets)?
Thanks,
Eric
I'm calling one perl script from another, with the second having debugging
enabled. Upon starting the second script, I immediately get the following.
If I disable debugging, it's fine. This script has been running a LONG
time, and I'm now trying to port from unix to Win32. I see a bug in cpan
back
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Luke Bakken
Sent: Monday, May 01, 2006 2:50 PM
To: Ng, Bill
Cc: perl-win32-users@listserv.ActiveState.com
Subject: Re: Easy One
On 5/1/06, Ng, Bill [EMAIL PROTECTED] wrote:
Real simple,
I have a
This appears to work:
use strict;
use warnings;
my @input=(abcd1234,abc12345,abcde123);
foreach my $sample(@input)
{
print $sample:\n;
$sample=~m/([a-zA-Z]*)([0-9]*)/;
my $letters=$1;
my $numbers=$2;
print Letters $letters\tNumbers $numbers\n;
}
Regards,
Try this link.
http://search.cpan.org/~jmcnamara/Spreadsheet-WriteExcel-2.16/lib/Spreadsheet/WriteExcel.pm#set_header(%24string%2C_%24margin
Ken Barker
IT Lead
Tel: 314-213-7927
1100 Corporate Square
St. Louis, MO 63132
[EMAIL PROTECTED]
From:
[EMAIL PROTECTED] on behalf of Eric
- Original Message -
From: Luke Bakken
.
.
Interestingly, MessageBeep() doesn't work on my XP machine but Beep()
does.
use strict;
use Win32::API;
my $msgBeep = Win32::API-new('user32', 'MessageBeep', 'N', 'N') or
die Can't create a beep function: $^E\n;
my $beep=
REGEX!
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Ng, Bill
Sent: Tuesday, May 02, 2006 3:55 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: Easy One
Real simple,
I have a string, $a for arguments sake, that contains
Hey Ken,
Thanks a lot!
That looks like the whole thing, right
there. I believe that is all I will need. I had no idea that existed.
Thanks again,
Eric
-Original Message-
From: Ken Barker
[mailto:[EMAIL PROTECTED]
Sent: Monday, May 01, 2006 7:36 PM
To: Eric Edwards;
Is there a reason you don't write it
my ($characterString, $numberString) = $string =~ /^([^\d]+)(.*)$/o;
This will assure the values are not defined if the regex fails. I also
added o.
On Mon, 1 May 2006, Luke Bakken wrote:
if (length $string == 8) # might as well check eh?
{
$string
20 matches
Mail list logo