#retrieving cookie
@purchases = split(/ /, cookie('cookie')) || die "No cookie!";