#!/usr/bin/perl
# 
# Filename: ip-down
#
$ENV{'PATH'} = "/bin:/usr/bin:/sbin:/usr/sbin";
$iface = $ARGV[0];
$ip = $ARGV[4];
`arp -d $ip pub`;
unlink ("/var/run/${iface}.session");