{
    use POSIX qw(strftime);
    use File::Slurp;
    #get CentOS release we are
    my $SUBVER = read_file('/etc/centos-release');
    $SUBVER =~ s/^CentOS (Linux )?release ([0-9\.]+).*?$/$2/; 
    chomp $SUBVER;
    $SUBVER =  $yum{eolversion} ||  $SUBVER || "6.10" ;
    return unless $SUBVER ne "";
    my $curdate = strftime '%Y%m%d', localtime;
    # return unless EOL is reached
    return unless ( "$curdate"  >= "20201130");
    for my $name ( qw(base updates centosplus extras fasttrack contrib centos-sclo-rh centos-sclo-centos) )
    {
        my $repo = $DB->get($name) or next;
        my $rname = ( $name eq 'base'  )? 'os' :$name; 
	$rname = 'sclo' if $name eq "centos-sclo-rh" or $name eq "centos-sclo-centos";
	my $sclo = "";
	$sclo = "rh/" if $name eq "centos-sclo-rh";
	$sclo = "sclo/" if $name eq "centos-sclo-centos"; 
        # setprop BaseURL  "http://vault.centos.org/$SUBVER/$rname/\$basearch/"
        $repo->set_prop('BaseURL', "http://vault.centos.org/$SUBVER/$rname/\$basearch/$sclo");
        # delprop MirrorList
        #$repo->delete_prop('MirrorList');
	$repo->set_prop('MirrorList', "disabled");
    }
}
