I can't define "elegant", but I know it when I see it. :)

Actually "cool" is often more applicable to Perl code than "elegant".