er is een patch voor mythtv waarmee je via een progje de osd
van myhttv kunt updaten.
nu wil ik dit vanuit een perl plugin voor gaim doen.
Alleen kan ik geen perl.
heb nu dit inelkaar geprutst:
is van de flite plugin en de echo plugin.
nu wil ik het volgende command opstarten :
mythtvosd --file=/usr/local/share/mythtv/alert.xml --alert_text="test"
en dan moet er in --alert_text" " tussen de aanhalingstekens $sender en $text worden opgenomen,
maar als ik dat tussen de " " zet dan krijg ik een foutmelding, hoe kan ik die $sender opnemen tussen " ". Ik neem aan dat er dan iets voor moet ?
maar wat?
verder tips om dit beter te laten functioneren zijn altijd welkom
van myhttv kunt updaten.
nu wil ik dit vanuit een perl plugin voor gaim doen.
Alleen kan ik geen perl.
heb nu dit inelkaar geprutst:
is van de flite plugin en de echo plugin.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
| use Gaim;
# for use with Gaim .68+
# A simple echo script... just to show how this new perl API works in .68+
# Drop this script in your ~/.gaim/ folder, and restart gaim.
%PLUGIN_INFO = (
perl_api_version => 2,
name => "mythtv",
version => "1.0",
summary => "mythtv plugin",
description => "mythtv plugin based on the flite plugin and echo",
author => "Koen Erens <emielratelband@hotmail.com>",
url => "http://gaim.sf.net/",
load => "plugin_load"
);
sub plugin_init {
return %PLUGIN_INFO;
}
sub plugin_load {
$plugin = shift ;
my $data = "" ;
#This is not the best plugin to use, as you will see if you try it. But I can't get displayed-im-msg
#to return the correct values.
Gaim::signal_connect(Gaim::Conversations::handle, "received-im-msg", $plugin, \&echo, $data);
}
sub echo {
print "HERE";
$account = $_[0];#useless
$sender = $_[1];
$text = $_[2];
$flag = $_[3]; #not sure what this is
#Various debug prints to show what has been passed in
Gaim::debug_info ( "\naccount: ", $account);
Gaim::debug_info ( "\nsender: ", $sender);
Gaim::debug_info ( "\ntext: ", $text);
Gaim::debug_info ( "\nflag: ", $flag);
print("$sendername said $message");
system("echo $sender says $text | flite");
return(0);
} |
nu wil ik het volgende command opstarten :
mythtvosd --file=/usr/local/share/mythtv/alert.xml --alert_text="test"
en dan moet er in --alert_text" " tussen de aanhalingstekens $sender en $text worden opgenomen,
maar als ik dat tussen de " " zet dan krijg ik een foutmelding, hoe kan ik die $sender opnemen tussen " ". Ik neem aan dat er dan iets voor moet ?
maar wat?
verder tips om dit beter te laten functioneren zijn altijd welkom
cd /pub && more beer