my $symm_id; foreach ( `symdev list -v` ) { if ( m/Symmetrix ID/ ) { $symm_id = ( m/Symmetrix ID\s+:\s+(\d+)/ ); } }