Hi
palkia,
I think you want the "/s" switch to the screensaver program.
This works for me, for example (if I'm in the screensaver directory):
#!/usr/bin/perl -w
use strict;
use warnings;
my $scr = "sspipes.scr";
system("$scr/s");
Good luck!
Update: Trying it with a random screensaver works too, so it seems /s is the correct, general solution. Again (lazily) from within the screensaver directory:
#!/usr/bin/perl -w
use strict;
use warnings;
my @ss = glob("*.scr");
my $scr = $ss[rand @ss];
system("$scr/s");
say
substr+lc crypt(qw $i3 SI$),4,5