http://www.perlmonks.org?node_id=972761


in reply to Activating a screen saver problems

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