#!/usr/bin/perl

use strict;
use warnings;

while (<DATA>) {
    print "$1\n" if ( m{^\*\s+(?:/\w+)+\s+(.+?)\s+} );
}

__DATA__
* /vobs/bt_rel /usr/add-on/puccase_vob01/ccvob01/bt_rel.vbs public (replicated)
* /scm /usr/add-on/puccase_vob01/ccvob01/scm.vbs public (replicated)
* /v_dialermidtier /usr/addon/puccase_vob01/ccvob01/v_dialermidtier.vbs public (replicated)
* /v_dialer /usr/add-on/puccase_vob01/ccvob01/v_dialer.vbs public (replicated)
* /vobs/UMTools /user/addon/puccase_vob01/ccvob01/UMtools.vbs replicated)