2 use OpenAFS
::CMU_copyright
;
3 use OpenAFS
::util
qw(:DEFAULT %AFS_Help);
14 open(FOO, ">sleeper.sh");
15 print FOO "#!/bin/sh\n";
16 print FOO "while true; do sleep 60; done\n";
19 chmod 0755, "sleeper.sh";
21 &AFS_bos_install(localhost,["sleeper.sh"],,);
22 &AFS_bos_create(localhost,sleeper,simple,["/usr/afs/bin/sleeper.sh"],);