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);
}