#! /usr/bin/perl

@config_list = sort( glob("config/*") );

for ( @config_list ) {
    if( /config\/rob_(.+)_(\d\d\d\d)\.cache/ ) {
	$ROB_SN = $1."_".$2;
	printf("dat/sc_rob_$ROB_SN.dat\n");
	# printf("sc_rob_$ROB_SN.dat ");
    }
}
