#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); my $event ="smeserver-mod_python-update"; safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/httpd-e-smith"); templates2events("/etc/httpd-e-smith/conf/httpd.conf", $event);