use PennMUSH; use MUSHConnection; use TestHarness; $mush = PennMUSH->new(); $god = $mush->loginGod(); test('stringsecs.1', $god, 'think stringsecs(a)', '#-1 INVALID TIMESTRING'); test('stringsecs.2', $god, 'think stringsecs(10)', '10'); test('stringsecs.3', $god, 'think stringsecs(10s)', '10'); test('stringsecs.4', $god, 'think stringsecs(5m)', '300'); test('stringsecs.5', $god, 'think stringsecs(5m 10s)', '310'); test('stringsecs.6', $god, 'think stringsecs(1h)', '3600'); test('stringsecs.7', $god, 'think stringsecs(10s 5m)', '310'); test('stringsecs.8', $god, 'think stringsecs(1d 2h 3m 4s)', '93784'); test('stringsecs.9', $god, 'think stringsecs(h)', '#-1 INVALID TIMESTRING');