From: SMTP%"FISK_ZAN@CCSUA.CTSTATEU.EDU" 5-FEB-1996 16:15:09.68 To: FISK_ZAN CC: Subj: [MacPerl] alarm? Return-Path: <owner-mac-perl@iis.ee.ethz.ch> Received: from err.ethz.ch by CCSUA.CTSTATEU.EDU with SMTP; Mon, 5 Feb 1996 16:15:07 -0500 (EST) Received: by err.ethz.ch id AA04382 (5.65c/IIS-2.7 for mac-perl-outgoing); Mon, 5 Feb 1996 19:57:21 +0100 Received: from ccsua.ctstateu.edu by err.ethz.ch with SMTP id AA04376 (5.65c/IIS-2.7 for <mac-perl@iis.ee.ethz.ch>); Mon, 5 Feb 1996 19:57:15 +0100 Date: Mon, 5 Feb 1996 13:58:15 -0500 (EST) From: "ZACHER, THE" <FISK_ZAN@CCSUA.CTSTATEU.EDU> To: mac-perl@iis.ee.ethz.ch Message-Id: <960205135815.2024d55d@CCSUA.CTSTATEU.EDU> Subject: [MacPerl] alarm? Sender: owner-mac-perl@iis.ee.ethz.ch Precedence: bulk I tried this script on mac perl. The script accepted my input but did nothing after. Is the sleep function part of mac perl? Also how can I make the beep '\a' ? #!perl print "When to alarm?\n"; $time = <STDIN>; chop ($time); sleep ($time); Zach- ####### # # # ##### # # #######