PHP规范TXT文件

来源：ymlon    更新时间：2019-11-28 23:15:22    编辑：用户1gt2d    浏览：350

$dw = "支|瓶|片|粒|盒|克|袋|包|g|G|ml|mg";

$find = array("香附子 克","复方氨酚烷胺胶囊 片");

$replace = array("香附子 克 无规格","复方氨酚烷胺胶囊 片 无规格");

$  = '药品报增报损表';

$reg   = '/起始日期(.*?)报增/';

$reg2   = '/名称(.*?)原因/';

$reg3   = '/(名称|药品报增|起始日期).*?/';

$file_path = "2017.txt";

$WriteStr = '';

$count = 0;

$allcount = 0;

if(file_exists($file_path)){

$file_arr = file($file_path);

for($i=0;$i

//if($  == $file_arr[$i]) break;

if (!preg_match($reg3,$file_arr[$i])){

$allcount++;

$file_arr[$i] = str_replace($find,$replace,$file_arr[$i]);

$reg4 = "/(\S+)\s?($dw)\s?(\S*)\s?(\d+)\s(\d+.\d{3})\s(\d+.\d{3})\s/u";

//土鳖虫 克 1 20000 0.119

preg_match_all($reg4, $file_arr[$i], $arr);

if(!empty($arr[1])){

$count ++;

//if(in_array($arr[1][0],$tsArry)) print_r($arr);

//echo sprintf("%03s",$count)."--".sprintf("%-'-40s",$arr[1][0]).sprintf("%-'-10s",$arr[2][0]).sprintf("%-'-10s",$arr[3][0]).sprintf("%-'-10s",$arr[4][0]).sprintf("%-'-20s",$arr[5][0]).sprintf("%-'-20s",$arr[6][0])."
";

echo sprintf("%03s",$count)."--".$arr[1][0]."--".$arr[2][0]."--".$arr[3][0]."--".$arr[4][0]."--".$arr[5][0]."--".$arr[6][0]."--"."
";

$WriteStr .= sprintf("%03s",$count)."--".$arr[1][0]."--".$arr[2][0]."--".$arr[3][0]."--".$arr[4][0]."--".$arr[5][0]."--".$arr[6][0]."\r\n";

}else{

echo "================================".$file_arr[$i]."==========
";

}

//$OneArr = explode(' ', $file_arr[$i]);

//if(count($OneArr)

//echo $file_arr[$i]."
";

}

}

}

Wtxt($WriteStr);

echo "=====".$allcount."========".$ ;

function Wtxt($str){    //写入文件

$myfile = fopen("TestPdfFile.txt", "w") or die("Unable to open file!");

fwrite($myfile, $str);

fclose($myfile);

}