>From Hermen suggestion I tried the following and now my head hurts on the
front and back. Below are two sample one works the other does not. What am
I missing beside my brains.
Good:
$fld1 = "3.3%";
$fld2 = "36.91%";
$fld3 = "4.08%";
$fld4 = "98.2%";
$bbrec =
sprintf("%05.02f\%|",$fld1).sprin
I have a perl script that moves files from one server to another server.
The current script hangs, if the network drive on the destination server is
down. What is an easy way to test if the connection is up and available.
Bill Bryan
EDM International
915-225-2526 Voice
915-225-2600 Fax
e-mail
Since I have notice the help that "strict" can provide, I have tried to use
it in all my scripts. I have encountered several things I can NOT figure
out how to correct. Listed below are samples:
my $jobname;
my $record;
my @getarray;
$getarray{$jobname} = $record;
Global symbol "%getarray" re
I have check out a Perl script on my desktop and it has no syntax errors. I
used "strict" to validate the Perl script. I copy the script to my
production machine and now I get a syntax error. I'm assuming that I have
different version of Perl on both machines. Is there a easy way to
determine
I have begun learning CGI from a book dated '96 which refers to UNIX as a
platform. I am using Win32 and have a question about an example from the
book, which I assume works on some system, just not mine, hehe.
What I do using I.E. 6.x is:
1. Enter the CGI path and filename in the browser Location
Silly things happen. I'm sure my next post will not approach anywhere near
silly. Maybe.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
I have a date in the format of "mm/dd/" I would like to convert
it to day of week (Sun,Mon,Tue,Wed,Thu,Fri,Sat).
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
What is wrong with the following:
@Customer[11] = "Citizen Bank";
@Cust_DID[33] = "1230";
$cust_did{@Cust_DID[11]} = @Customer[33];
$did = "1230";
$cust_name = ($cust_did{$did});
print "Customer name = $cust_name.\n";
exit;
___
Perl-Win32-Users mailing