sub get_cc_view{
    my @ccView = ();
    @ccView = (grep /Set view:/, @ccView)[0];
    my $view = (split(/:/ , $setView))[1];
    $view =~ s/\s//g;
    $CC_View = $view;
    $CC_View = "View: $CC_View";
}