Tkx: Usage for binding with multiple parameters

Hi,

I'm using Tkx for my nice interface, and so far things work great.

But I don't get to work a specific thing I need to do: In "scale.tcl",  
there are bindings like

    bind TScale <ButtonPress-1>   { ttk::scale::Press %W %x %y }

I'd like to change that in my Perl program to

    bind TScale <ButtonPress-1>   { ttk::scale::Jump %W %x %y }

I can't figure out how to execute the latter command via Tkx in Perl.  
Tkx::Ev does only work for one argument, but here three are expected.

I would be very happy if someone could point me into the right direction.

Thank you, and greetings,

Mazze