I think I had black text on a black bg or it was outside of the image. After
some trial & error, I got it to work. Corrected version is below along with
notes to clarify since I found the module notes to be scant.
Jo
#!/usr/bin/perl
use strict;
use warnings;
use CGI;
use GD;
use GD::Text::Wra
I originally started with GD $image->string(); which worked fine, except the
text is too long. I then found text::wrap could be the solution, but I can't
get it to work. I am trying to print red text on a black background. I am
only getting the background. What am I missing or doing wrong?
Jo
How about this? Jo
#!/usr/bin/perl
use strict;
use warnings;
my @list = qw/dog is a there/;
my @sortOrder = (3,1,2,0);
my @sorted;
foreach (@sortOrder) { push(@sorted,$list[$_]); }
print "@sorted";
exit;
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands
Hi!
Thanks for your time, John.
You solved the mystery! :)
Now I shall resolve my problem!
As for that open to fork a child, I got that from Perl Cookbook 19.6 and
echoed by a couple of other sources as I spent days looking and learning
about ways to minimize security risks with issuing system co
ANOTHER CLUE:
I dropped the tar -tzf tesing portion of sub bakkup. There is now only one
system call, and the email sending is now only doubled up.
Child or Exit codes issue?
Jo
sub bakkup {
my $archive ="/home/devsite/bakTEST/$todayUTS.tar.gz";
my @filesToBackup = ("$petFi
Okay, I stripped it down to 2 subroutines. Maybe easier to troubleshoot?
The below sends 4 email messages.
If I skip &bakkup; by commenting out, it sends 1 message as expected.
WHY? What's in &bakkup that is interfering with other actions?
Jo
#!/usr/bin/perl -Tw
use strict;
$ENV{'PATH'} = '/b
Are you supposed to be printing something here?
Somewhat newb, but this doesn't look right to me:
print (FO);
I'm guessing you want to remove commas and so are rewriting the line into a
new file after subst. I'd probably do
print FO "$_";
I suspect your way may just be leaving the server
Greetings All! I am stumped and hoping someone can help solve this mystery.
It seems I have introduced a bug in my script while attempting to move from
a simple duplicate file backup (using File::Copy copy) to a tar.gz method to
conserve space.
I've cut out most of the extraneous stuff, what's le
