perldoc is designed to search for files that contain Pod. If the code isn't in the same file as the Pod then perldoc won't give you what you want. For example:
perldoc -m Inline
For most cases the following will probably do what you want:
perl -ne '/^=/../^=cut/ or print' file