jesuashok has asked for the wisdom of the Perl Monks concerning the following question:
Hi all,
what the above code does? I am interested to know the above functionalitymy $pat = {qw(a - b = c ~ d ^)}->{substr($0, 0, 1)};
"Keep pouring your ideas"
Back to
Seekers of Perl Wisdom