@Data = split( ' ', $RouterOutput[0,2] );
if ( ( $Data[0] eq 'Device' ) && ( $Data[1] eq 'ID:' ) ) {
   $SwitchName = $Data[2] ;
   $SwitchName =~ s/$'site.com'//i ;
}
if ( ( $Data[0] eq 'IP' ) && ( $Data[1] eq 'address' ) ) {
   $SwitchIP = $Data[2] ;
}