3
票
Perlで euc-jp "\xE7" does not map to Unicode というエラーが出る
同様のエラーをUbuntu18.04LTSで発生させましたが,解決した方法を記述します.
1) CentOS 7系のサーバ上に KyotoCorpus4.0 と mai95.txt (SJIS) を移動
2) src/format.pl と src/dupli.pl を EUC-JP環境で最初の部分を下記のように書き換えます
format.pl
#use encoding 'euc-jp';
#...
3
票
perl で while(<STDIN>) は何を意味しますか?
STDIN はファイルハンドルで、標準入力にアサインされています。
標準入力とは
キーボードからの入力やパイプ(例:cat sample.txt || perl test.pl) や
リダイレクト(例:perl test.pl < sample.txt)されたファイルのことです。
<STDIN> は、
<ファイルハンドル>で、指定されたファイルから一行を読込み、変数$...
3
票
承認済み
perlのsql結果について
定数を利用せずに、直接数値を指定して結果判定をしていいかということでしょうか?
まず、動作するかどうかについてですが、定数を利用せずに直接数値で判定を行っても正しく動作すると思います。
しかし、よほど特別な理由がない限り避けた方がよいです。
プログラムに直接固定の数値を書くことを「マジックナンバー」と呼びます。
このマジックナンバーを多用すると「可読性低下」「保守性低下」...
2
票
承認済み
perlでの標準入力からの値の取得
おそらく、Windows環境でない環境でコードが動いているからだと思います。
https://www.javadrive.jp/perl/encoding/index2.html
※「cp932」はMicrosoftがShift_JISを独自に拡張した文字コードです。
とあります。
binmode STDIN, ':encoding(cp932)';
binmode STDOUT, ':...
2
票
Nginx+Apache環境でPerlスクリプトが動作するようにする方法
お世話になります。
私の単純なミスで、cgiを動作させるモジュールがロードされていなかったため、Perlスクリプトが動かなかったようです。
a2enmod cgi
でモジュールを有効化して、Apacheを再起動させたところ、正常に動作するようになりました。
ありがとうございました。
以上、今後ともよろしくお願いいたします。
2
票
perlファイルからpostgresqlに接続して結果を知りたい
質問はPerlというより libpg のお話だと思いますので、既にご紹介されている perldoc に加えて libpgのドキュメントを読まれるのをお勧めしておきます。Perldocの日本語訳がよければこちらもあります。
どこを見るのが正確なんでしょうか??
クエリ実行結果は $result->resultStatus の値で判定します。
値は 次の定数のいずれかです。
...
1
票
承認済み
Perlのモジュール、File::BOMとencodingの順番について
なぜかコメントに変換されてしまいましたが、これは根源的な回答です。
英語版に重複質問して解決しました。:viaは常に最後だそうです。
https://stackoverflow.com/questions/78534335/perl-the-order-of-filebom-module-and-encoding-and-output-defect/78535768#78535768
:via(...
1
票
Perl スクリプトを動かそうとすると `"Util.bundle"は、開発元を検証できないため開けません。`
こちらの方法で解決しました。
Mac「開発元を検証できないため開けません」を解決する方法! App Storeからダウンロードされないアプリを実行しよう
sudo spctl --master-disable
1
票
承認済み
perlで二次元配列の書き方について
while = <IN>で読みとった行をsplitで分割(今回の場合は1文字ずつ)しながら"配列の配列"、の行に対して代入していけばよいかと思います。
#!/usr/bin/perl
my $file = "sample.txt";
my @AoA = (); # 配列の配列(Array of Array)
my $i = 0;
open(FH,"<$file") ...
1
票
承認済み
ドラッグ&ドロップで複数ファイルをアップロードするには?
e.dataTransfer.files は配列なので。
function onDrop(e) {
e.stopPropagation();
e.preventDefault();
var files = e.dataTransfer.files;
for(var i= 0;i &...
1
票
承認済み
ドラッグ&ドロップされたファイルをサーバにアップロードするには?
FormData オブジェクトを使うと良いかと
ファイルのアップロードについて、formの<input type = "file">を使ってのアップロードはできています。
サーバ側は動いているようなので、perlのコードはそのまま使えると思います、url: 'f.php' をperlのURLに変更してください。
(サンプルコードは、...
1
票
PythonにおけるPerlのrequire文のようなものは?
perlで言うuseに対するrequireのようなものが、pythonにあるかという意味でしょうか。
パッケージ名ではなくファイルパスからランタイムにインポートしたいという。
python2
import imp
your_module = imp.load_source('your_module', './path/to/your_module.py')
your_module....
1
票
JavaScriptとPerlで、ファイルをドラッグ&ドロップしたらアップロード
コードを見た感じではたぶん現状では、ファイルをドラッグアンドドロップしてもそのファイルが開かれるだけかと思います。
サンプルと指定されているコードはAjaxでファイルをPOSTするプログラムのようなのでFormタグは不要ですね。
ファイルをドロップするための領域をDIVなどで用意して、 その領域に対してイベントハンドラの「ondragover="onDragOver(event)" ondrop=...
1
票
Perl の \@list と [@list] には、どんな違いがありますか?
\@list は 変数 @list のリファレンスですが、[@list] は @list を展開したリストを格納する無名配列のリファレンスです。無名配列は不要になれば消されるので、見掛けが同じでも無名配列まで同じとは限りません。確かめるとき print 文は如何でしょう。
my @list = 1..3;
print \@list, "\n" for 1..3;
print [@list], ...
1
票
承認済み
Perl の \@list と [@list] には、どんな違いがありますか?
今回のmapのような場面で[]を使ったとしても、間違いとは言い切れないと思います。
\と[]の違いですが
\はご存知の通りリファレンスを作り出します。
[]は無名配列を作り出しそのリファレンスを返してくれます。
\はなにも配列へのリファレンスを作り出すためだけに使用するものではありません。
スカラーへのリファレンス、配列へのリファレンス、ハッシュへのリファレンスというように使えます。
...
1
票
配列から連続して同じものを取り出さない
1) splice を使って選んだ要素を削除する。
2) 選んだ要素を最後の要素と入れ替えて、pop(削除)する、あるいはpop(削除)せずに選択レンジを1小さくする。
無効化に投票