FIRST: the example code. (See Advanced Perl Programming , p.266. in sub pick_word{}
($page , $section) = ( $line =~ /^(\w+) (\(.*?\))?/)
This works find for a manpage of the from 'ftpd(8)' What about a page such as 'dhcp-config(5)' ? # '-' is not int that class What about 'Cache::Cache(3)' and 'Tk::widget::demo(3)' ? Here -- :: is not in the class. In all cases, I need to catch the page in () and assign it to $page as was done in the above example.
In reply to HELP! I am in regex-hell by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |