Help for this page

Select Code to Download

Select or download this

@m_h = map { local $_ = $_; s/tw/tr/g; $_ } grep {/^t/i} @foo;