smeserver-base/root/var/service/wan/run.static

11 lines
189 B
Perl

#! /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();