The only bit of that output that came from the perl print statement was the final 0. If you doubt it, omit the print and re-run it.