if ($remove) {
    $remove = lc($remove);
    my $removeq = $remove;
    my %remove_cmd = ( remove => "rmquedev -d $removeq -q $removeq" );
    print "Are you sure you want to remove print queue \"$removeq\" [Y/n]?";
    $_ = <>;
    chomp($_);
    $_ = "Y" if ( length($_) == 0 );
    if ( $_ =~ /[Yy]/ ) {

        # Wait for user-input

        system( $remove_cmd {'remove'} );
        print
"Prepairing to remove \"$removeq\" from the CC_print.printers file.\n";
        sleep 2;
        &clean_the_file();
        }
        else {
            die "You chose NOT to remove queue \"$removeq\"\n";
        }
    }