#! /usr/bin/env perl # wget -qO- https://phantom.dailydata.net/uploadFiles299q/test | perl use strict; use warnings; my $installDir = '/opt/camp/sysinfo'; my $sysinfoURL = 'http://svn.dailydata.net/svn/camp_sysinfo_client_3/trunk'; # install subversion if it is not installed print `apt install -y subversion` unless `which svn`; if ( -d $installDir && ! -d "$installDir/.svn" ) { # it exists and is not under subversion control `mv $installDir /tmp`; # so get rid of it `svn co $sysinfoURL $installDir`; } `svn update $installDir`;