{"id":5198,"date":"2016-03-29T02:49:30","date_gmt":"2016-03-28T17:49:30","guid":{"rendered":"http:\/\/www.achiachi.net\/nikki\/?p=5198"},"modified":"2017-06-13T07:09:03","modified_gmt":"2017-06-12T22:09:03","slug":"perl%ef%bc%9arfc4180%e3%81%ab%e6%ba%96%e6%8b%a0%e3%81%aecsv%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%82%92%e8%aa%ad%e3%81%bf%e8%be%bc%e3%82%80%e6%96%b9%e6%b3%95","status":"publish","type":"post","link":"https:\/\/www.achiachi.net\/nikki\/perl%ef%bc%9arfc4180%e3%81%ab%e6%ba%96%e6%8b%a0%e3%81%aecsv%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%82%92%e8%aa%ad%e3%81%bf%e8%be%bc%e3%82%80%e6%96%b9%e6%b3%95.html","title":{"rendered":"Perl\uff1aRFC4180\u306b\u6e96\u62e0\u306eCSV\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u8fbc\u3080\u65b9\u6cd5"},"content":{"rendered":"

\u3000CSV\u30d5\u30a1\u30a4\u30eb\u306bRFC4180\u3068\u8a00\u3046\u6a19\u6e96\u5316\u3055\u308c\u305f\u30eb\u30fc\u30eb\u304c\u5b58\u5728\u3057\u3066\u3044\u308b\u4e8b\u3092\u77e5\u3063\u305f\u306e\u3067\u3001\u305d\u306e\u30d5\u30a1\u30a4\u30eb\u304c\u8aad\u307f\u8fbc\u3081\u308b\u3088\u3046\u306a\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u66f8\u3044\u3066\u307f\u305f\u3002<\/p>\n

\u7279\u5fb4<\/strong>
\n\u30fb\u9806\u756a\u306b\u51e6\u7406\u3057\u3066\u3044\u308b\u306e\u3067\u51e6\u7406\u901f\u5ea6\u306f\u9045\u3044\u3067\u3059\u3002\u9045\u3044\u3068\u3044\u3063\u3066\u3082Corei7(3.4GHz)+SSD\u74b0\u5883\u306710000\u884c\u00d7100\u30d5\u30a3\u30fc\u30eb\u30c9(1\u30d5\u30a3\u30fc\u30eb\u30c910\u6587\u5b57\u30fb\u8a0810MB)\u306e\u30d5\u30a1\u30a4\u30eb\u306a\u30891\u79d2\u7a0b\u5ea6\u3067\u5b8c\u4e86\uff08\u30d6\u30e9\u30a6\u30b6\u306e\u8868\u793a\u6642\u9593\u306f\u9664\u304f\uff09
\n\u30fb\u3067\u304d\u308b\u3060\u3051\u66f8\u5f0f\u3092\u58ca\u3055\u306a\u3044\u3088\u3046\u8aad\u307f\u8fbc\u3093\u3067\u3044\u308b\u3002\u8aad\u307f\u8fbc\u3093\u3060\u30d5\u30a1\u30a4\u30eb\u306fCSV\u30d9\u30fc\u30b9\u306e\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u306b\u5909\u63db\u3001\u6539\u884c\u306fCR\u3068LF\u5225\u3067\u8a8d\u8b58\u3057\u30d5\u30a3\u30fc\u30eb\u30c9\u3092\u56f2\u3080\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3082\u4fdd\u6301\u3057\u3066\u3044\u308b\u306e\u3067\u3001\u6b63\u78ba\u306b\u51e6\u7406\u3059\u308c\u3070\u4fdd\u5b58\u6642\u306b\u8aad\u307f\u8fbc\u307f\u6642\u3068\u540c\u3058\u66f8\u5f0f\u3067\u4fdd\u5b58\u3067\u304d\u308b\u3002<\/p>\n

<\/p>\n

\n

\u203b\u30d7\u30ed\u30b0\u30e9\u30e0\u521d\u5fc3\u8005\u306e\u305f\u3081\u3001\u3053\u306e\u30da\u30fc\u30b8\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u30bd\u30fc\u30b9\u306f\u6b63\u5e38\u306b\u52d5\u4f5c\u3057\u306a\u3044\u4e8b\u304c\u3042\u308a\u307e\u3059\u3054\u6ce8\u610f\u4e0b\u3055\u3044\u3002<\/strong><\/p>\n

\n

CSV\u30d5\u30a1\u30a4\u30eb\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u306e\u6982\u8981<\/strong><\/p>\n

\u3000CSV\u30d5\u30a1\u30a4\u30eb\u306f\u3001\u30c6\u30ad\u30b9\u30c8\u30c7\u30fc\u30bf\u3092\u30ab\u30f3\u30de\u3068\u6539\u884c\u3067\u533a\u5207\u3063\u305f\u30d5\u30a1\u30a4\u30eb\u5f62\u5f0f\u3002\u57fa\u672c\u7684\u306b\u306f\u30c6\u30ad\u30b9\u30c8\u30d5\u30a1\u30a4\u30eb\u306a\u306e\u3067Windows\u306e\u30e1\u30e2\u5e33\u306a\u3069\u3067\u3082\u898b\u308b\u4e8b\u304c\u3067\u304d\u3001\u30eb\u30fc\u30eb\u3092\u5b88\u308c\u3070\u30e1\u30e2\u5e33\u3092\u4f7f\u3044\u624b\u52d5\u3067\u7de8\u96c6\u3059\u308b\u4e8b\u3082\u3067\u304d\u308b\u307b\u3069\u7c21\u5358\u306a\u5f62\u5f0f\u3067\u3001\u5c0f\u898f\u6a21\u306e\u30c7\u30fc\u30bf\u30d9\u30fc\u30b9\u306e\u4fdd\u5b58\u3084\u7570\u306a\u308b\u30c7\u30fc\u30bf\u30d9\u30fc\u30b9\u30b7\u30b9\u30c6\u30e0\u9593\u306e\u30c7\u30fc\u30bf\u79fb\u884c\u306a\u3069\u3067\u3082\u4f7f\u7528\u3055\u308c\u308b\u306a\u3069\u3001\u4f7f\u7528\u7bc4\u56f2\u304c\u5e83\u3044\u6c4e\u7528\u7684\u306a\u30d5\u30a1\u30a4\u30eb\u3002
\n\u3000\u554f\u984c\u70b9\u3068\u3057\u3066\u3001\u304b\u306a\u308a\u4ee5\u524d\u304b\u3089\u3042\u308b\u30d5\u30a1\u30a4\u30eb\u5f62\u5f0f\u3060\u304c\u8fd1\u5e74\u307e\u3067\u6a19\u6e96\u5316\u3055\u308c\u306a\u304b\u3063\u305f\u305f\u3081\u591a\u6570\u306e\u4ed5\u69d8\u304c\u4e71\u7acb\u3057\u3066\u3044\u308b\u30022005\u5e74\u306b\u4e71\u7acb\u3057\u3066\u3044\u305f\u4ed5\u69d8\u306e\u4e2d\u304b\u3089\u5229\u7528\u983b\u5ea6\u306e\u9ad8\u304b\u3063\u305f\u7269\u3092\u6a19\u6e96\u5316(RFC4180)\u3055\u308c\u305f\u3082\u306e\u306e\u3001RFC4180\u306e\u66f8\u5f0f\u304c\u96e3\u89e3\u306a\u306e\u3068\u4ee5\u524d\u306e\u30c7\u30fc\u30bf\u30fb\u30bd\u30d5\u30c8\u3068\u306e\u4e92\u63db\u6027\u306e\u305f\u3081\u65b0\u3057\u3044\u30bd\u30d5\u30c8\u3084\u30c7\u30fc\u30bf\u3067\u3042\u3063\u3066\u3082RFC4180\u306b\u6e96\u62e0\u3057\u3066\u306a\u3044\u7269\u3082\u6570\u591a\u304f\u5b58\u5728\u3057\u3066\u3044\u308b\u306e\u3067\u6ce8\u610f\u304c\u5fc5\u8981\u3002<\/p>\n

RFC4180\u306f\u4e0b\u8a18\u30a2\u30c9\u30ec\u30b9\u304b\u3089\u898b\u308c\u307e\u3059\u3002
\nhttp:\/\/www.ietf.org\/rfc\/rfc4180.txt<\/a><\/p>\n

\n

RFC4180\u306e\u30eb\u30fc\u30eb<\/strong>
\n\u203b\u7ffb\u8a33\u30b5\u30a4\u30c8\u3067\u7ffb\u8a33\u3057\u305f\u3082\u306e\u3092\u8981\u7d04\u3057\u305f\u306e\u3067\u4e0d\u6b63\u78ba\u304b\u3082<\/p>\n

2-1.\u5404\u30ec\u30b3\u30fc\u30c9\u306f\u6539\u884c(CRLF)\u3067\u533a\u5207\u3089\u308c\u308b\u3002
\n2-2.\u6700\u7d42\u30ec\u30b3\u30fc\u30c9\u306e\u6700\u5f8c\u306e\u6539\u884c\u306f\u3042\u3063\u3066\u3082\u306a\u304f\u3066\u3082\u826f\u3044\u3002
\n2-3.\u5148\u982d\u306e\u30d8\u30c3\u30c0\u884c\u306f\u30aa\u30d7\u30b7\u30e7\u30f3\u3067\u901a\u5e38\u30ec\u30b3\u30fc\u30c9\u3068\u540c\u3058\u66f8\u5f0f(\u30d8\u30c3\u30c0\u306fMIME\u306e\u8a2d\u5b9a\u3067\u6307\u5b9a)
\n2-4.\u30ec\u30b3\u30fc\u30c9\u5185\u306b\u306f1\u3064\u4ee5\u4e0a\u306e\u30d5\u30a3\u30fc\u30eb\u30c9\u304c\u3042\u3063\u3066\u3082\u3088\u3044\u3001\u30d5\u30a3\u30fc\u30eb\u30c9\u306f\u30b3\u30f3\u30de\u3067\u533a\u5207\u308b\u3001\u5404\u30ec\u30b3\u30fc\u30c9\u306e\u30d5\u30a3\u30fc\u30eb\u30c9\u6570\u306f\u30d5\u30a1\u30a4\u30eb\u5168\u4f53\u3067\u540c\u4e00\u3001\u30b9\u30da\u30fc\u30b9\u306f\u30d5\u30a3\u30fc\u30eb\u30c9\u306e\u4e00\u90e8\u3068\u307f\u306a\u3057\u7121\u8996\u3057\u306a\u3044\u3001\u30ec\u30b3\u30fc\u30c9\u6700\u5f8c\u306e\u30d5\u30a3\u30fc\u30eb\u30c9\u306f\u30b3\u30f3\u30de\u3067\u7d42\u308f\u3089\u306a\u3044
\n2-5.\u30d5\u30a3\u30fc\u30eb\u30c9\u306f\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u307e\u306a\u304f\u3066\u3082\u826f\u3044
\n2-6.\u30d5\u30a3\u30fc\u30eb\u30c9\u306b\u6539\u884c(CRLF)\u30fb\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u30fb\u30ab\u30f3\u30de\u304c\u3042\u308b\u5834\u5408\u306f\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u3080
\n2-7.\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u307e\u308c\u305f\u30d5\u30a3\u30fc\u30eb\u30c9\u4e2d\u306e\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306f\u30a8\u30b9\u30b1\u30fc\u30d7\u3059\u308b\u3002<\/p>\n

\u203b\u4f5c\u3063\u305f\u30d7\u30ed\u30b0\u30e9\u30e0\u3067\u306f\u3001
\n\u30fb\u6539\u884c\u304cCRLF\u4ee5\u5916\u3067\u3082\u52d5\u4f5c\u3057\u307e\u3059\u3002
\n\u30fb\u30d8\u30c3\u30c0\u884c\u306e\u5224\u5b9a\u306f\u3057\u3066\u3044\u306a\u3044\u306e\u3067\u901a\u5e38\u30ec\u30b3\u30fc\u30c9\u3068\u3057\u3066\u8868\u793a\u3055\u308c\u308b\u3002
\n\u30fb\u30d5\u30a3\u30fc\u30eb\u30c9\u6570\u306f\u540c\u4e00\u3067\u306a\u304f\u3066\u3082\u8aad\u307f\u3053\u3081\u308b\u304c\u3001\u8868\u793a\u306e\u969b\u306b\u30c6\u30fc\u30d6\u30eb\u306e\u53f3\u5074\u306b\u7a7a\u767d\u304c\u3067\u304d\u308b\u3002
\n\u30fb\u30ec\u30b3\u30fc\u30c9\u6700\u5f8c\u306e\u30d5\u30a3\u30fc\u30eb\u30c9\u306f\u30b3\u30f3\u30de\u3067\u7d42\u308f\u3089\u3063\u3066\u3082\u8aad\u307f\u8fbc\u307e\u308c\u308b\u304c\u3001\u8868\u793a\u306e\u969b\u306b\u30c6\u30fc\u30d6\u30eb\u306b\u306f\u8868\u793a\u3055\u308c\u306a\u3044\u3002<\/p>\n

\n

\u5927\u307e\u304b\u306a\u51e6\u7406\u306e\u6d41\u308c<\/strong><\/p>\n

\u300crfc4180_conv\u300d\u306f\u3001\u4e0e\u3048\u3089\u308c\u305fRCF4180\u6e96\u62e0\u306e\u6587\u5b57\u5217\u304b\u3089\u3001\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u5185\u306e\u300c\u6539\u884c\u30fb\u30b3\u30f3\u30de\u30fb\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u300d\u3092\u30a8\u30b9\u30b1\u30fc\u30d7\u51e6\u7406\u3057\u305f\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u306b\u5909\u63db\u3057\u307e\u3059\u3002
\n\u3000\u3053\u306e\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u306e\u7279\u5fb4\u306f\u3001\u300c\u30d5\u30a3\u30fc\u30eb\u30c9\u304c\u30b3\u30f3\u30de\u533a\u5207\u308a\u300d\u300c\u30ec\u30b3\u30fc\u30c9\u304c\u6539\u884c\u533a\u5207\u308a\u300d\u306b\u306a\u308b\u3063\u3066\u3044\u308b\u306e\u3067\u5358\u7d14\u306b\u6539\u884c\u3068\u30b3\u30f3\u30de\u3067\u5206\u5272\u3059\u308c\u3070\u4efb\u610f\u306e\u30d5\u30a3\u30fc\u30eb\u30c9\u306e\u5024\u3092\u53d6\u5f97\u3067\u304d\u3001\u30a8\u30b9\u30b1\u30fc\u30d7\u3055\u308c\u3066\u3044\u308b\u300c\u6539\u884c\u30fb\u30b3\u30f3\u30de\u30fb\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u300d\u3092\u5143\u306b\u623b\u3059\u3068\u672c\u6765\u306e\u5024\u304c\u53d6\u5f97\u3067\u304d\u307e\u3059\u3002<\/p>\n

\u4f8b
\n\u3000RFC4180\u306eCSV\u30d5\u30a1\u30a4\u30eb
\n “aaa”,”bbb”,”ccc”(crlf)
\n “a,a”,”b””b”,”c(crlf)c”(crlf)
\n “aaa”,”bbb”,”ccc”
\n \u2193
\n \u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8(\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u5185\u306e\u6539\u884c\u30fb\u30b3\u30f3\u30de\u30fb\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u300c!\uff5e\u300d\u306b\u30a8\u30b9\u30b1\u30fc\u30d7)
\n “aaa”,”bbb,”ccc”(crlf)
\n “a!1″,”b!2b”,”c!3!4c”(crlf)
\n “aaa”,”bbb”,”ccc”<\/p>\n

1.\u51e6\u7406\u7528\u306b1\u6587\u5b57\u7279\u6b8a\u6587\u5b57\u3092\u8a2d\u5b9a\u3059\u308b\u3002\uff08\u4eca\u56de\u306f\u300c!\u300d\u3092\u4f7f\u7528\u3059\u308b\uff09
\n\u3000\u6587\u4e2d\u306b\u300c!\u300d\u304c\u3042\u308b\u3068\u4e0d\u5177\u5408\u306b\u306a\u308b\u305f\u3081\u300c!0\u300d\u306b\u30a8\u30b9\u30b1\u30fc\u30d7\u3059\u308b\u3002
\n2.\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u5206\u5272\u3059\u308b
\n3.\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u307e\u308c\u305f\u7bc4\u56f2\u3092\u7279\u5b9a\u3059\u308b\u305f\u3081\u5076\u6570\u500b\u3067\u7d50\u5408\u3059\u308b
\n4.\u30a8\u30b9\u30b1\u30fc\u30d7\u3055\u308c\u305f\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306e\u7d50\u5408\u3057
\n \u30a8\u30b9\u30b1\u30fc\u30d7\u3055\u308c\u305f\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306f\u300c””\u300d\u2192\u300c!2\u300d\u306b\u7f6e\u304d\u63db\u3048
\n5.\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u5185\u306e\u30b3\u30f3\u30de\u3068\u6539\u884c\u3092\u7279\u6b8a\u306a\u6587\u5b57\u5217\u306b\u7f6e\u304d\u63db\u3048\u308b
\n\u3000\u30b3\u30f3\u30de\u300c,\u300d\u2192\u300c!1\u300d
\n\u3000\u6539\u884c(CR)\u2192\u300c!3\u300d
\n\u3000\u6539\u884c(LF)\u2192\u300c!4\u300d
\n \u203b\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306e\u5916\u306f\u305d\u306e\u307e\u307e\u3002
\n6.\u4e0a\u8a18\u3067\u51e6\u7406\u3057\u305f\u6587\u5b57\u3092\u3059\u3079\u3066\u7d50\u5408\u3059\u308b\u3068
\n \u30d5\u30a3\u30fc\u30eb\u30c9\u304c\u30b3\u30f3\u30de\u533a\u5207\u308a\u3001\u30ec\u30b3\u30fc\u30c9\u304c\u6539\u884c\u533a\u5207\u308a\u306b\u306a\u308b\u3002
\n7.\u8868\u793a\u65b9\u6cd5
\n\u3000\u6539\u884c\u3067\u5206\u5272\u3057\u2192\u30b3\u30f3\u30de\u3067\u5206\u5272\u3057\u30d5\u30a3\u30fc\u30eb\u30c9\u304c\u5358\u4f4d\u306b\u3059\u308b\u3002
\n\u3000\u203b\u30d5\u30a3\u30fc\u30eb\u30c9\u304c\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u307e\u308c\u3066\u3044\u308b\u5834\u5408\u306f\u3001
\n\u3000\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3082\u305d\u306e\u307e\u307e\u306a\u306e\u3067\u4e0d\u8981\u306a\u3089\u524a\u9664\u3059\u308b\u3002
\n\u3000\uff08\u3053\u306e\u51e6\u7406\u306e\u524d\u306b\u300c$str = ~s\/”\/\/g;\u300d\u3068\u3059\u308c\u3070\u4e00\u62ec\u524a\u9664\u3067\u304d\u308b\uff09
\n8.\u30d5\u30a3\u30fc\u30eb\u30c9\u3054\u3068\u7279\u6b8a\u6587\u5b57\u3092\u623b\u3059
\n\u3000\u30b3\u30f3\u30de\u300c!1\u300d\u2192\u300c,\u300d
\n\u3000\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u3080\u300c!2\u300d\u2192\u300c”\u300d
\n\u3000\u300c!3\u300d\u2192\u6539\u884c(CR)
\n\u3000\u300c!4\u300d\u2192\u6539\u884c(LF)
\n\u3000\u300c!0\u300d\u2192\u300c!\u300d \u203b!\u306f\u6700\u5f8c\u306b\u623b\u3059\u3002<\/p>\n

\u3053\u308c\u3067\u5b8c\u4e86<\/p>\n

\n

\u30d7\u30ed\u30b0\u30e9\u30e0<\/strong>
\n\u524d\u534a\u306fHTML\u8868\u793a\u3059\u308b\u305f\u3081\u306e\u30c7\u30e2\u30d7\u30ed\u30b0\u30e9\u30e0\u3001\u5f8c\u534a\u306e\u300crfc4180_conv\u300d\u95a2\u6570\u304c\u672c\u4f53<\/p>\n

\r\n\r\n#!\/usr\/local\/bin\/perl\r\nmy $html;  #\u753b\u9762\u51fa\u529b\u7528\r\nmy $str;   #\u5165\u529b\u30c7\u30fc\u30bf\r\n\r\n#\u30c7\u30e2\u7528\u306eCSV\u30c7\u30fc\u30bf\u3092\u30ed\u30fc\u30c9\r\n$str.='01,A,B,C'.\"\\x0D\\x0A\";\r\n$str.='\"02\",\"A\",\"B\",\"C\"'.\"\\x0D\\x0A\";\r\n$str.='\"03\",\"A'.\"\\x0D\\x0A\".'A\",\"B,B\",\"C\"\"C';\r\n\r\n$html.=\"<hr \/>1.\u5165\u529b\u6642\u306e\u72b6\u614b(\u6539\u884ccrlf\u306f\u8868\u793a\u3055\u308c\u3066\u306a\u3044)<br \/>$str\";\r\n\r\n#rfc4180\u304b\u3089\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u3078\r\nmy $my_csv=&rfc4180_conv($str);\r\n\r\n$html.=\"<hr \/>2.\u5909\u63db\u5f8c\u306e\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u72b6\u614b<br \/>$my_csv\";\r\n\r\n#\u5143\u306b\u623b\u3059\r\nmy $save=$my_csv;\r\n$save=~s\/!1\/,\/g;\r\n$save=~s\/!2\/\"\/g;\r\n$save=~s\/!3!4\/\\x0D\\x0A\/g;\r\n$save=~s\/!3\/\\x0D\/g;\r\n$save=~s\/!4\/\\x0A\/g;\r\n$save=~s\/!0\/!\/g;\r\n$html.=\"<hr \/>3.\u4fdd\u5b58\u5f62\u5f0f\u306b\u623b\u3059(1\u3068\u540c\u3058\u306f\u305a)<br \/>$save\";\r\n\r\n#html\u306e\u30c6\u30fc\u30d6\u30eb\u30bf\u30b0\u3068\u3057\u3066\u51fa\u529b\r\n\r\n#\u203b\u300c\"\u5024\"\u300d\u306e\u300c\"\u300d\u3092\u4e00\u62ec\u524a\u9664\r\n#\u2193\u300c\"\u5024\"\u300d\u306e\u3088\u3046\u306b\u56f2\u307f\u304c\u5fc5\u8981\u306a\u5834\u5408\u306f\u30b3\u30e1\u30f3\u30c8\u30a2\u30a6\u30c8\u3059\u308b\r\n$my_csv=~s\/\"\/\/g;\r\n\r\n$my_csv=~s\/\\x0D\\x0A\/\\x0D\/g;   #\u6539\u884c\u30b3\u30fc\u30c9\u3092CR\u306b\u7d71\u4e00\u3057\u3066split\r\n$my_csv=~s\/\\x0A\/\\x0D\/g;\r\nmy @row=split(\/\\x0D\/,$my_csv);\r\n$html.=\"<hr \/>4.\u72ec\u81ea\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u304b\u3089\u30c6\u30fc\u30d6\u30eb\u8868\u793a(\u6539\u884c\u306fBR\u306b\u7f6e\u63db\u3057\u3066\u3042\u308b)\";\r\n\r\n$html.=\"<table border=1>\";\r\nforeach my $val1(@row){\r\n    $html.=\"<tr>\";\r\n    my @field=split(\/,\/,$val1);\r\n    foreach my $val2(@field){\r\n        #\u7279\u6b8a\u6587\u5b57\u3092\u5143\u306b\u623b\u3059(\u203b\u6539\u884c\u306fHTML\u7528\u306bBR\u306b\u3057\u3066\u3042\u308b)\r\n        $val2=~s\/!1\/,\/g;\r\n        $val2=~s\/!2\/\"\/g;\r\n        $val2=~s\/!3!4\/<br \\\/>\/g;\r\n        $val2=~s\/!3\/<br \\\/>\/g;\r\n        $val2=~s\/!4\/<br \\\/>\/g;\r\n        $val2=~s\/!0\/!\/g;\r\n        $html.=\"<td>$val2<\/td>\";\r\n    }\r\n    $html.=\"<\/tr>\";\r\n}\r\n$html.=\"<\/table>\";\r\n\r\n\r\nprint \"Content-type: text\/html\\n\\n\";\r\nprint \"<html><head><\/head><body>$html<\/body><\/html>\";\r\nexit;\r\n\r\n\r\n# CSV\u30d5\u30a1\u30a4\u30eb\u306e\u6587\u5b57\u5217\u3092\u72ec\u81ea\u5f62\u5f0f\u306b\u5909\u63db\r\nsub rfc4180_conv{\r\n    my $data=$_[0];   #\u6587\u5b57\u5217\r\n    my @d1=\"\";        #\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u5206\u5272\u3057\u305f\u5024\u3092\u683c\u7d0d\u7528\r\n    my $count;        #\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306e\u6570\r\n    my $i;            #\u30eb\u30fc\u30d7\u7528\r\n    my $line;         #\u51fa\u529b\u7528\r\n    my $start;        #\u30eb\u30fc\u30d7\u958b\u59cb\u4f4d\u7f6e\r\n\r\n    $data=~ s\/!\/!0\/g;        #\u51e6\u7406\u7528\u306e\u7279\u6b8a\u6587\u5b57\u3092\u6c7a\u3081\u300c!\u300d\u2192\u300c!0\u300d\u306b\u30a8\u30b9\u30b1\u30fc\u30d7\u3059\u308b\u3002\r\n    $count=(()=$data=~\/\"\/g); #\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u306e\u6570\u3092\u30ab\u30a6\u30f3\u30c8\u3002\r\n    @d1=split(\/\"\/,$data);    #\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u5206\u5272\r\n\r\n    #\u30eb\u30fc\u30d7\u958b\u59cb\u59cb\u4f4d\u7f6e\u8a2d\u5b9a\u3001\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u56f2\u3080\u306e\u306b\u5076\u6570\u56de\u3067\u51e6\u7406\u3057\u305f\u3044\u305f\u3081\r\n    #1\u3064\u3081\u304c\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3067\u59cb\u307e\u3089\u306a\u3044\u5834\u5408\u306f2\u3064\u3081\u306e\u30c7\u30fc\u30bf\u304b\u3089\u884c\u3046\u3002\r\n    if ($d1[0]=~\/^\"\/){\r\n        $start=0;\r\n    }else{\r\n        $start=1;\r\n        $line=$d1[0];\r\n    }\r\n\r\n    #split\u3067\u6d88\u3048\u305f\u300c\"\u300d\u3092\u4ed8\u52a0\u3059\u308b\r\n    for($i=$start;$i<=$count;$i++){            \r\n        $d1[$i]='\"'.$d1[$i];\r\n\t}\r\n\r\n    #\u30c0\u30d6\u30eb\u30af\u30a9\u30fc\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u5076\u6570\u5358\u4f4d\u3067\u51e6\u7406\u3059\u308b\u3002\r\n    for($i=$start;$i<=$count;$i=$i+2){\r\n        $d1[$i]=~s\/,\/!1\/g;    #\u30b3\u30f3\u30de\u3092\u7279\u6b8a\u6587\u5b57\u300c!1\u300d\u306b\u7f6e\u63db\r\n        $d1[$i]=~s\/\\x0D\/!3\/g; #\u6539\u884c(CR)\u3092\u7279\u6b8a\u6587\u5b57\u300c!3\u300d\u306b\u7f6e\u63db\r\n        $d1[$i]=~s\/\\x0A\/!4\/g; #\u6539\u884c(CR)\u3092\u7279\u6b8a\u6587\u5b57\u300c!4\u300d\u306b\u7f6e\u63db\r\n\r\n        #\u300c\"\"\u300d\u3092\u7279\u6b8a\u6587\u5b57\u300c!2\u300d\u306b\u7f6e\u63db\r\n        if($d1[$i] eq '\"'){\r\n            if($d1[$i+1] eq '\"'){\r\n                if($d1[$i+2] =~\/^\"\/){\r\n                    $d1[$i+1]=\"\";\r\n                    $d1[$i+2]=~s\/^\"\/!2\/g;\r\n               }\r\n            }\r\n         }elsif($d1[$i+1] eq '\"'){\r\n                if($d1[$i+2] =~\/^\"\/){\r\n                    $d1[$i+1]=\"\";\r\n                    $d1[$i+2]=~s\/^\"\/!2\/g;\r\n               }\r\n         }\r\n        $line.=\"$d1[$i]$d1[$i+1]\";\r\n    }\r\n    return($line);\r\n}\r\n\r\n<\/pre>\n
\n
\u611f\u60f3<\/strong>
\n\u3000\u7c21\u5358\u305d\u3046\u306aCSV\u30d5\u30a1\u30a4\u30eb\u3067\u3059\u304c\u3001\u601d\u3063\u305f\u4ee5\u4e0a\u306b\u96e3\u3057\u3044\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u3067\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"
\u3000CSV\u30d5\u30a1\u30a4\u30eb\u306bRFC4180\u3068\u8a00\u3046\u6a19\u6e96\u5316\u3055\u308c\u305f\u30eb\u30fc\u30eb\u304c\u5b58\u5728\u3057\u3066\u3044\u308b\u4e8b\u3092\u77e5\u3063\u305f\u306e\u3067\u3001\u305d\u306e\u30d5\u30a1\u30a4\u30eb\u304c\u8aad\u307f\u8fbc\u3081\u308b\u3088\u3046\u306a\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u66f8\u3044\u3066\u307f\u305f\u3002 \u7279\u5fb4 \u30fb\u9806\u756a\u306b\u51e6\u7406\u3057\u3066\u3044\u308b\u306e\u3067\u51e6\u7406\u901f\u5ea6\u306f\u9045\u3044\u3067\u3059\u3002\u9045\u3044\u3068\u3044\u3063\u3066\u3082Corei7( […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[84],"tags":[92],"class_list":["post-5198","post","type-post","status-publish","format-standard","hentry","category-84","tag-perl"],"_links":{"self":[{"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/posts\/5198","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/comments?post=5198"}],"version-history":[{"count":8,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/posts\/5198\/revisions"}],"predecessor-version":[{"id":5254,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/posts\/5198\/revisions\/5254"}],"wp:attachment":[{"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/media?parent=5198"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/categories?post=5198"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.achiachi.net\/nikki\/wp-json\/wp\/v2\/tags?post=5198"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}