From: Serge M. <sm...@vi...> - 2011-09-04 21:51:29
|
<html> <head> <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1"> </head> <body bgcolor="#FFFFFF" text="#3333FF"> <br> Based on Marc Merlin's code I found on his blog, I would like to control my Denon AVR via telnet, with my X10 Rf remote. <br> <br> <i>if (state_now $Volume_Denon eq 'on') {<br> print_log "volumeup";<br> run echo -ne "MVUP\r" | nc denon 23;<br> }</i><br> I have also tried with "<i>run echo -ne "MVUP\r" | nc denon 23"<br> I can run this command from command line and it works, it is just a matter of finding the syntax to insert it in my perl code.<br> </i>But It does not work, basically I want to be able to run a command, based on certain X10 commands.<br> <br> Thanks<br> Serge<br> </body> </html> |
From: Joel D. <jr...@pr...> - 2011-09-04 22:12:04
|
Serge- Try: system("echo -ne \"MVUP\r\" | nc denon 23"); Joel -- Joel Davidson Austin, TX On Sun, 4 Sep 2011, it would appear that Serge Martel wrote: > > Based on Marc Merlin's code I found on his blog, I would like to control my > Denon AVR via telnet, with my X10 Rf remote. > > if (state_now $Volume_Denon eq 'on') { > print_log "volumeup"; > run echo -ne "MVUP\r" | nc denon 23; > } > I have also tried with "run echo -ne "MVUP\r" | nc denon 23" > I can run this command from command line and it works, it is just a matter > of finding the syntax to insert it in my perl code. > But It does not work, basically I want to be able to run a command, based on > certain X10 commands. > > Thanks > Serge > > |
From: Serge M. <sm...@vi...> - 2011-09-05 14:27:45
|
<html> <head> <meta content="text/html; charset=ISO-8859-1" http-equiv="Content-Type"> </head> <body bgcolor="#FFFFFF" text="#3333FF"> Joel,<br> <br> You pointed me in the right direction, with :<br> run("echo -ne \"MVUP\r\" | nc denon 23"); <br> <br> it works! <br> Can you explain why the extra \ before "?<br> <br> Thanks again!.<br> Serge<br> <br> Le 2011-09-04 18:11, Joel Davidson a écrit : <blockquote cite="mid:alp...@er..." type="cite">Serge- <br> <br> Try: <br> <br> system("echo -ne \"MVUP\r\" | nc denon 23"); <br> <br> Joel <br> -- <br> Joel Davidson <br> Austin, TX <br> <br> <br> On Sun, 4 Sep 2011, it would appear that Serge Martel wrote: <br> <br> <blockquote type="cite"> <br> Based on Marc Merlin's code I found on his blog, I would like to control my <br> Denon AVR via telnet, with my X10 Rf remote. <br> <br> if (state_now $Volume_Denon eq 'on') { <br> print_log "volumeup"; <br> run echo -ne "MVUP\r" | nc denon 23; <br> } <br> I have also tried with "run echo -ne "MVUP\r" | nc denon 23" <br> I can run this command from command line and it works, it is just a matter <br> of finding the syntax to insert it in my perl code. <br> But It does not work, basically I want to be able to run a command, based on <br> certain X10 commands. <br> <br> Thanks <br> Serge <br> <br> <br> </blockquote> <br> <br> <br> </blockquote> </body> </html> |
From: Joel D. <jr...@pr...> - 2011-09-05 15:31:10
|
Here's my understanding of how it works, but realize that I'm not a computer science guy so my terminology may be wrong: The run command argument has to be in quotes, and the echo command wants to see its argument in quotes as well, so by escaping the quotes around the arguments for echo you're telling the run command to evaluate the entire string such that echo will receive the second quoted string. Or something like that... Hope that helps. Joel On Mon, 5 Sep 2011, it would appear that Serge Martel wrote: > Joel, > > You pointed me in the right direction, with : > run("echo -ne \"MVUP\r\" | nc denon 23"); > > it works! > Can you explain why the extra \ before "? > > Thanks again!. > Serge > > Le 2011-09-04 18:11, Joel Davidson a ecrit : > Serge- > > Try: > > system("echo -ne \"MVUP\r\" | nc denon 23"); > > Joel > -- > Joel Davidson > Austin, TX > > > On Sun, 4 Sep 2011, it would appear that Serge Martel wrote: > > > Based on Marc Merlin's code I found on his blog, I > would like to control my > Denon AVR via telnet, with my X10 Rf remote. > > if (state_now $Volume_Denon eq 'on') { > print_log "volumeup"; > run echo -ne "MVUP\r" | nc denon 23; > } > I have also tried with "run echo -ne "MVUP\r" | nc > denon 23" > I can run this command from command line and it > works, it is just a matter > of finding the syntax to insert it in my perl code. > But It does not work, basically I want to be able to > run a command, based on > certain X10 commands. > > Thanks > Serge |
From: Brian P. <br...@th...> - 2011-09-05 21:49:50
|
If you put the run command in single quotes, it should work too and not require the back slashes. run( 'echo -ne "MVUP\r" | nc denon 23' ); On Sep 5, 2011, at 11:30 AM, Joel Davidson wrote: > Here's my understanding of how it works, but realize that I'm not > a computer science guy so my terminology may be wrong: > > The run command argument has to be in quotes, and the echo command > wants to see its argument in quotes as well, so by escaping the quotes > around the arguments for echo you're telling the run command to evaluate > the entire string such that echo will receive the second quoted string. > > Or something like that... Hope that helps. > > Joel > > > On Mon, 5 Sep 2011, it would appear that Serge Martel wrote: > >> Joel, >> >> You pointed me in the right direction, with : >> run("echo -ne \"MVUP\r\" | nc denon 23"); >> >> it works! >> Can you explain why the extra \ before "? >> >> Thanks again!. >> Serge >> >> Le 2011-09-04 18:11, Joel Davidson a ecrit : >> Serge- >> >> Try: >> >> system("echo -ne \"MVUP\r\" | nc denon 23"); >> >> Joel >> -- >> Joel Davidson >> Austin, TX >> >> >> On Sun, 4 Sep 2011, it would appear that Serge Martel wrote: >> >> >> Based on Marc Merlin's code I found on his blog, I >> would like to control my >> Denon AVR via telnet, with my X10 Rf remote. >> >> if (state_now $Volume_Denon eq 'on') { >> print_log "volumeup"; >> run echo -ne "MVUP\r" | nc denon 23; >> } >> I have also tried with "run echo -ne "MVUP\r" | nc >> denon 23" >> I can run this command from command line and it >> works, it is just a matter >> of finding the syntax to insert it in my perl code. >> But It does not work, basically I want to be able to >> run a command, based on >> certain X10 commands. >> >> Thanks >> Serge > > ------------------------------------------------------------------------------ > Special Offer -- Download ArcSight Logger for FREE! > Finally, a world-class log management solution at an even better > price-free! And you'll get a free "Love Thy Logs" t-shirt when you > download Logger. Secure your free ArcSight Logger TODAY! > http://p.sf.net/sfu/arcsisghtdev2dev > ________________________________________________________ > To unsubscribe from this list, go to: http://sourceforge.net/mail/?group_id=1365 |
From: Serge M. <sm...@vi...> - 2011-09-06 10:30:28
|
<html> <head> <meta content="text/html; charset=ISO-8859-1" http-equiv="Content-Type"> </head> <body bgcolor="#FFFFFF" text="#3333FF"> Yes it does, single quotes work too<br> <br> Thanks to both of you<br> <br> Serge<br> <br> Le 2011-09-05 17:49, Brian Paulsen a écrit : <blockquote cite="mid:5D4...@th..." type="cite"> <pre wrap="">If you put the run command in single quotes, it should work too and not require the back slashes. run( 'echo -ne "MVUP\r" | nc denon 23' ); On Sep 5, 2011, at 11:30 AM, Joel Davidson wrote: </pre> <blockquote type="cite"> <pre wrap="">Here's my understanding of how it works, but realize that I'm not a computer science guy so my terminology may be wrong: The run command argument has to be in quotes, and the echo command wants to see its argument in quotes as well, so by escaping the quotes around the arguments for echo you're telling the run command to evaluate the entire string such that echo will receive the second quoted string. Or something like that... Hope that helps. Joel On Mon, 5 Sep 2011, it would appear that Serge Martel wrote: </pre> <blockquote type="cite"> <pre wrap="">Joel, You pointed me in the right direction, with : run("echo -ne \"MVUP\r\" | nc denon 23"); it works! Can you explain why the extra \ before "? Thanks again!. Serge Le 2011-09-04 18:11, Joel Davidson a ecrit : Serge- Try: system("echo -ne \"MVUP\r\" | nc denon 23"); Joel -- Joel Davidson Austin, TX On Sun, 4 Sep 2011, it would appear that Serge Martel wrote: Based on Marc Merlin's code I found on his blog, I would like to control my Denon AVR via telnet, with my X10 Rf remote. if (state_now $Volume_Denon eq 'on') { print_log "volumeup"; run echo -ne "MVUP\r" | nc denon 23; } I have also tried with "run echo -ne "MVUP\r" | nc denon 23" I can run this command from command line and it works, it is just a matter of finding the syntax to insert it in my perl code. But It does not work, basically I want to be able to run a command, based on certain X10 commands. Thanks Serge </pre> </blockquote> <pre wrap=""> ------------------------------------------------------------------------------ Special Offer -- Download ArcSight Logger for FREE! Finally, a world-class log management solution at an even better price-free! And you'll get a free "Love Thy Logs" t-shirt when you download Logger. Secure your free ArcSight Logger TODAY! <a class="moz-txt-link-freetext" href="http://p.sf.net/sfu/arcsisghtdev2dev">http://p.sf.net/sfu/arcsisghtdev2dev</a> ________________________________________________________ To unsubscribe from this list, go to: <a class="moz-txt-link-freetext" href="http://sourceforge.net/mail/?group_id=1365">http://sourceforge.net/mail/?group_id=1365</a> </pre> </blockquote> <pre wrap=""> </pre> </blockquote> </body> </html> |