Hi i am trying to play the video in webmin with the help of file manager module.I have did so much research regarding this but the code doesnt seem to work. I hopefully get help from here. This is my code
#!/usr/bin/perl require './filemin-lib.pl'; use lib './lib'; use strict; use warnings; use File::Basename; use Cwd 'abs_path'; &ReadParse(); get_paths(); my $file ='/home/abhishek/Videos/lua.mp4'; my $size = -s "$file"; my $begin=0; my $end=$size; (my $name, my $dir, my $ext) = fileparse($file, qr/\.[^.]*/); print "Content-Type: application/x-vlc-plugin \n"; print "Cache-Control: public, must-revalidate, max-age=0"; print "Pragma: no-cache" ; print "Content-Disposition: attachment; filename=\"$name$ext\"\n"; print "Content-Transfer-Encoding: binary"; print "Accept-Ranges: bytes"; print "Content-Length: $end - $begin \n\n"; print "Connection: close"; open (FILE, "< $file") or die "can't open $file: $!"; binmode FILE; my $cur=$begin; seek(FILE,$begin,0); while(!eof(FILE) && $cur < $end) { my $buf=1024*16; read FILE, $buf, $end-$cur; $cur+=1024*16; } close FILE;
Though i can able to open the plugin but it is failing to play the video.Please someone help me regarding this.I am breaking my head to think some other logic. Please someone suggest me any idea about this.It will be very grateful Thanks in advance.
In reply to playing video using vlc plugin by awanti
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |