>(set 'a (list 1 2 3))
Both return:
(1 2 3) #Right!
>(cdr a)
perl-lisp returns:
3     #Wrong!
Lisp returns:
(2 3) #Right!