Ich teste gerade hier die Möglichkeit mit einem einfachen Tag Video in Kommentare einzufügen.
Markdown oder Textile beherrscht das leider nicht und diese Ungetüme, die auf den Video-Seiten als HTML-Code angeboten werden sind ziemlich sperrig und fehlerträchtig für unerfahrene Nutzende.
Aber es geht einfach, mit ein bisschen Perl-Code als Hilfe.
Pseudo-HTML
Ich verwende zum Einbetten ein HTML-ähnliches Konstrukt,
bestehend aus <VID Url_des_Videos>.
Perl-Code
#### GwenDragon: Change Video tags <VID http://example.org/...>
# !!!!!!!!! ACHTUNG !!!!!!!!!!!!!
# zweifaches eval im Ersetzen
# weiter unten ist es risikoreich!
#
my %replaces = (
'video.google.com/' => {
name => 'Google-Video',
from => qr'\/videoplay\?',
to => q'/googleplayer.swf?'
},
'youtube.com/' => {
name => 'Youtube',
from => qr'\/watch\?v=',
to => q'/v/'
},
'myvideo.de/' => {
name => 'MyVideo',
from => qr'\/watch\/(\d+)\/.+',
to => q'/embed/$1'
},
'vimeo.com/' => {
name => 'vimeo',
from => qr'\/\/vimeo\.com\/(\d+)',
to => q'//player.vimeo.com/video/$1'
},
);
my $repl = sub {
my $url = shift;
my $template = shift;
my $src;
return if not length $url;
for my $k ( keys %replaces ) {
if ( $url =~ m|$k| ) {
my $from = $replaces{ $k }->{ from };
my $to = $replaces{ $k }->{ to };
$src = $url
if length $url
and $url =~ /$from/;
$url =~ s|$from|qq{"$to"}|ee;
$src = $url if not defined $src;
$template =~ s|###NAME###|$replaces{$k}->{name}|g;
$template =~ s|###URL###|$url|g;
$template =~ s|###SRC###|$src|g;
return $template;
}
}
return qq{<p style="color:red"><em>Video von '$url' kann nicht eingebettet erden!</em></p>};
};
my $regex = qr|\<VID\s+([^\>]+)?\s*\>|i;
$comment =~ s|$regex|$repl->("$1",<<HTML)|egi;
<object width="480" height="320" data="###URL###">
<embed src="###URL###">
<br>Der Browser kann das Video nicht darstellen</embed>
</object>
<br>Quelle: <a href="###SRC###">###NAME###</a>
HTML
#### end replace <VID ...>
Anwendung in Kommentaren dieses Blogs
Im Kommentar nur <VID VideoURL> einfügen. Dann erzeugt das Feedback-Plugin die Einbindung des Videos.
So wird aus <VID http://www.youtube.com/watch?v=ju1IMxGSuNE> das folgende Video mit Larry Wall, der Perl als für Menschen verständlich Programmiersprache ansieht:
Quelle: YouTube
Bislang werden nur die URLs folgender Anbieter erkannt:
- video.google.com
- youtube.com
- myvideo.de
- vimeo.com
Ich bitte um weitere Vorschläge, auch für die URLs auf Videos bei seriösen Videohostern.






