diff options
Diffstat (limited to 'app/xlockmore/etc/xlockranddur.pl')
| -rw-r--r-- | app/xlockmore/etc/xlockranddur.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/app/xlockmore/etc/xlockranddur.pl b/app/xlockmore/etc/xlockranddur.pl new file mode 100644 index 000000000..c9fd5fe15 --- /dev/null +++ b/app/xlockmore/etc/xlockranddur.pl @@ -0,0 +1,6 @@ +#!/usr/bin/perl -w +# xarand +open(S,"/usr/games/fortune|wc|"); +local(@numbers) = split(" ",<S>); +print int $numbers[2]/3; +close(S); |