use dignostics;
"my" variable $k masks earlier declaration in same scope at program.pl line 7 (#1)
(W misc) A "my" or "our" variable has been redeclared in the current scope or statement, effectively eliminating all access to the previous instance. This is almost always a typographical error. Note that the earlier variable will still exist until the end of the scope or until all closure referents to it are destroyed.

artist