in reply to TK param passing
When you specify a callback (this is the magic word to search for) for a Tk action and this callback need arguments you need to pass an anonymous array with the function and it's arguments
-command => [ \&subname, arg1, arg2 ... ]
See it explained in it's own doc: Tk::callbacks
In your example, if I understand it correctly $yscroll arrives as $b in the sub and the anonymous array [$p1, $p2, $p3, $p4, $p5] arrives as $wigs in the sub.
Anyway, as AnonymousMonk telegraphically stated, use Data::Dump and it's dd method to dump what @_ is inside of your sub.
L*
|
|---|