#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); # create smeserver-sendmail-wrapper-ipdate event as link to safe_symlink("webapps-update", "root/etc/e-smith/events/smeserver-sendmail-wrapper-update")