Svn Client via SSH on a nonstandard port

Hello :) Considering that I’ve setup a subversion server on a virtual machine and it binds ssh on port 1022, I had to find a way to tell to svn client how to contact that port…

So,  how dows it works?
It’s simple:

  1. Edit ~/.subversion/config
  2. Find tunnels sections and insert the following lines:
    [tunnels]
    ssh = ssh -p 1022
  3. It’s done, save the file and use svn client as always. :)

Byez.

    Send mail with Perl

    How to simply send mail in Perl?

    I use Email::Simple to send an email in a perl script (many emails), here is an example:

    my $sendmail = "/usr/sbin/sendmail -t";
    my $email = Email::Simple->create(
         header => [
              From    => 'some@thing.tld',
              To      => 'some@destination.tld',
              Subject => 'Subject of the Message',
          ],
          body => 'Body of the Email',
    );
    
    $email->header_set( 'X-Content-Container' => 'bottle/glass' );
    
    open SENDMAIL, "|$sendmail" or die "Cannot open $sendmail: $!";
        print SENDMAIL $email->as_string;
    close SENDMAIL;
    

    As we can see, it’s very simple to build a new Email message from scratch, I’m sure that exists a lot of way better than this, but I like Email::Simple :)

    Any comment or suggestion is wellcome.

    Bye ;)

    Altro script in bash usato da me a lavoro :)

    Della serie “come aiutarsi con gli strumenti di Linuxxeee”

    #!/bin/bash
    
    HOSTS=( "xxxxx.xxx" "xxx" "xxxxxx.xx" "xxxxxxx" "xxxx.xx" )
    PWD="/etc/syslog-ng"
    THOST=""
    
    function get_remote() {
    	user=$1
    	host=$2
    	logDestination=`ssh ${user}@${host} egrep "^.*remotelog.*udp" ${PWD}/syslog-ng.conf |awk {'print $1'}`
            if [ -z ${logDestination} ]
            then
                    echo -n "LOGGING NOK "
            else
                    echo -n "LOGGING OK "
            fi
    
    	return 0
    }
    
    function ctl_host() {
    	host=$1
    	if ! ping -c1 -w5 ${host} &>/dev/null
    	then
    		#echo "${host} Non raggiungibile provo a cambiare dominio"
    		for t_index in $(seq 0 $((${#HOSTS[@]} - 1)))
    		do
    			#echo "Provo: ${host}.${HOSTS[t_index]} ..."
    			nHost="${host}.${HOSTS[t_index]}"
    			if ping -c3 -w10 ${nHost} >/dev/null
    			then
    				#echo "Trovato: ${nHost}"
    				THOST=${nHost}
    				break
    			fi
    		done
    	else
    		THOST=${host}
    	fi
    
    	return 0
    }
    
    function get_network() {
    	user=$1
    	host=$2
    	vlan202=`ssh ${user}@${host} ip route show |egrep "10.32.0.0" |awk {'print $1'}`
    	if [ -z ${vlan202} ]
            then
                    echo "VLAN202 NOK"
            else
    		echo "VLAN202 OK"
    	fi
    
    	return 0
    }
    
    function main() {
    	for dbhosts in $(cat listadb.txt)
    	do
    		echo -n "${dbhosts}: "
    		ctl_host ${dbhosts}
    		get_remote root ${THOST}
    		get_network root ${THOST}
    		if [ $? -gt 0 ]
    		then
    			echo "Qualcosa e andato storto su: ${dbhosts}."
    		fi
    	done
    
    	return 0
    }
    
    main
    exit 0
    

    Kyle XY

    Ultimamente mi son dato alla visione di Kyle XY, un telefilm che parla di un ragazzo nato in laboratorio… Carino, e` un po` un accrocchio tra Heroes e The OC, ma rende l’idea :D

    Tratta da wikipedia qualche informazione in piu`:

    Kyle XY è una serie televisiva statunitense creata da ABC Family che narra le vicende di Kyle, un ragazzo risvegliatosi in una foresta nei pressi di Seattle (Washington) senza alcuna memoria della sua vita fino a quel momento. La serie racconta la vita di Kyle ed i suoi tentativi di rispondere alle domande su chi sia, perché non abbia l’ombelico e perché non ricordi nulla della sua infanzia. Durante la sua permanenza dai Trager, Kyle verrà a contatto con alcune sue straordinarie capacità che neanche egli sa spiegare.

    La serie ha esordito il 26 giugno 2006 sul network americano ABC Family con una prima stagione composta da 10 episodi; visto l’ottimo andamento degli ascolti, si è girata una seconda stagione di 23 episodi partita l’11 giugno 2007 sullo stesso canale. ABC Family Network ha confermato la produzione della terza stagione, per il momento prevista di 10 episodi, e il debutto è previsto per il 12 gennaio 2009. Tuttavia, visto il brusco calo di ascolti all’inizio della terza stagione, il 2 febbraio 2009, il network ha annunciato la cancellazione del telefilm che si concluderà quindi al termine della terza stagione[1] [2]. Precedentemente a questa decisione, era già stato pensato il finale della serie: la sceneggiatrice ha quindi rilasciato un’intervista durante la quale ha rivelato ciò che prevedeva la quarta stagione [3].

    I fan, terribilmente dispiaciuti dallo stroncamento definitivo della serie, hanno cercato in tutti i modi di impedirlo. Ad esempio, attraverso una petizione online.

    In Italia la prima stagione è stata trasmessa in anteprima sul canale satellitare Fox dal 16 luglio 2007 con un doppio appuntamento alle ore 21:00, mentre della seconda stagione sono andati in onda i primi 13 episodi durante l’inverno 2007/2008. I restanti episodi della seconda stagione sono andati in onda dal 4 aprile 2009 ogni sabato alle 14.50 con un doppio episodio settimanale, sempre su Fox. La terza, ed ultima, stagione va in onda su Fox dal 22 Settembre 2009 alle 21:10. Per quanto riguarda la messa in onda in chiaro la serie è stata trasmessa dal 23 marzo 2009 su Italia 1, che ha trasmesso le prime due stagioni.

    Come al solito si puo`  notare che i geni dei networks segano le serie cosi` dal nulla per ovvi motivi economici, sara` la crisi? Bah :D Ai posteri l’ardua sentenza, posto qualche video carino riguardo la serie qui di seguito.

    [youtube]http://www.youtube.com/watch?v=KUdkWVaqsw8[/youtube]

    [youtube]http://www.youtube.com/watch?v=RWK1LoieXak[/youtube]

    Have fun! :)