open (my $fh, "<", "$mycrdir/file_detail.txt" );
foreach(my $value = <$fh>)
{
    chomp($value);
    if($value eq "abc") 
    {
        qx/"mkdir $mydir"/;
        func1($mycrnum,$mydir,$value,%envparams);
        func2($mycrnum,$mydir,$value,%envparams);
    }
    elsif($value eq "123") 
    {
        qx/"mkdir $mydir"/;
        func1($mycrnum,$mydir,$value,%envparams);
        func2($mycrnum,$mydir,$value,%envparams);
    }
}