#! ./srexx

parse version a
say a
ii = initial_date()
if ii ~= '' then
 { say
   say "Expires on "ii
   say
 }

if serial() ~= '' then say 'Serial number: "'serial()'"'
