#! /usr/bin/perl use warnings; use strict; use esmith::ConfigDB; use POSIX; my $db = esmith::ConfigDB->open_ro; system("/sbin/ifup", $db->get_prop('ExternalInterface', 'Name')); pause();