Unfortunately pod2usage
is too static for this purpose. You might look at App::Cmd or Getopt::Long::Descriptive (used by App::Cmd) to get some functionality closer to this.
That said you don't need to use pod2usage to print usage statements, its just a helpful way to dump the scripts own pod.