You can use Tcl/Tk via Tcl::Tk Perl module so to get access to video wiget from Perl.

But first you must install Tcl/Tk with said widget (these widgets are refered for example from http://mini.net/tcl/864, see QuickTimeTcl and http://developer.berlios.de/projects/tkvideo on that page) and then you will have access to it.

Also, in case your $^O equals to 'MSWin32' you can use Win32 ActiveX control from within Perl+Tcl::Tk and gain same effect, but OS-dependant.
Example of using ActiveX is at the bottom of page http://vkonovalov.ru/perl-tcltk.htm

Courage