Die bisherigen Antworten klingen so, als käme bei diesem Kode eine Warnung. Bei mir (ActivePerl v5.14.2) ist das leider nicht der Fall.

Zum Thema 'deprecated': Ich finde es gut, wenn man vor der Verwendung gefährlicher oder veralteter Konstrukte gewarnt wird. Noch schöner (ist or wäre) es, wenn bei use diagnostics; noch gesagt würde, warum hier gewarnt wird und wie man's besser machen kann.