Pretty close. I think you want:
(split /#/)[0] [download]
See the Copyright notice on my home node.
Perl training courses
In reply to Re: split split by davorg in thread split split by Plankton