#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); service_link_enhanced("fusioninventory-agent", "S88", "7"); service_link_enhanced("fusioninventory-agent", "K12", "6"); service_link_enhanced("fusioninventory-agent", "K12", "0"); service_link_enhanced("fusioninventory-agent", "K12", "1"); safe_touch("root/var/service/fusioninventory-agent/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/fusioninventory-agent'); safe_symlink("/var/service/fusioninventory-agent" , 'root/service/fusioninventory-agent');