- ベストアンサー
Perlからファイルオープンダイアログを使うには？
Perlでスクリプトを組んでいます。 Perlからファイルオープンダイアログを開いて、ファイル名を得たいと思っています。どのようにすればよいか、教えていただけますか？ 宜しくお願いいたします。
- Perl
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
perlから直接ダイアログを呼ぶなら、PerlTKを使ってください。 http://www.geocities.jp/m_hiroi/perl_tk/index.html
関連するQ&A
- win32なモジュールでファイルを開くダイアログを出したい
Windows98にActiveState perl(Version5.008 build805)という環境です。 perlからWindowsの"ファイルを開く"ダイアログを起動させて、そこからファイル名を取得し、perlに戻したいのですが、そのためのモジュールが分りません。 いろいろページを見ていたのですが、これ！と言うのが見つからず困っています。 すみませんが、どなたか教えていただけないでしょうか？ できれば、簡単なコードなんかあると助かります。。
- ベストアンサー
- Perl
- Perl - ファイルのオープン
Perl でカウンタを作っているんですが、 mkdir($year, 0755) などをした後に、 open(F, "+< ./$year/$mon/$day.log") $count = <F> $count ++; print F $count; のようにしているのですが、カウンタファイルが新規作成されませんし、存在しても更新されません。 どうすればいいでしょうか？
- ベストアンサー
- Perl
- ダイアログについて
オープンファイルダイアログやセーブファイルダイアログをだしたときに、文字コードを選択させたいのですが、 普通にだすと「ファイル名」「ファイルの種類」しか選べません。 その下にプルダウンで文字コードを選択させたいのです。 例えていえば、メモ帳で「名前を付けて保存」や「開く」を選んだときにでてくるようなダイアログです。 できますでしょうか？ 初心者で何も分からないので、よろしくお願いします。
- 締切済み
- その他（プログラミング・開発）
- 頭にperlとつけないと実行できない
solaris8・perl5.6.1において、作成したperlのスクリプトを実行する時に、 頭にperlをつけて $ perl ファイル名 としないとスクリプトが実行できません。 実行ユーザーにパスはとおっています。 普通に $ ファイル名 で実行するにはどうしたら良いかアドバイス頂けないでしょうか。 よろしくお願いいたします。
- ベストアンサー
- Perl
- Perl ファイルハンドルを閉じずに反映させる
お世話になっております。 Perl(プログラミング言語)について質問です。 openメソッドで開いたファイルハンドルに print文で書込みを行った際に、ファイルハンドルをcloseせずに、 書込みを反映させる方法はありますか？ 開くのはファイルではなく(他プロセスへの)パイプです。 $| を設定してもだめでした (例としては perl1.pl , perl2.pl を用意する <perl1.pl> $i; open(OUT,"| perl2.pl") while(1){ print OUT "$i" $i++ } close(OUT) <perl2.pl> while( <STDIN> ) { print $_; } のようなことをやりたいです。 上記のようなスクリプトを実行したところ、 perl1のcloseが実行されるまで反映されません。 これをcloseをせずに反映させる方法はありますでしょうか？ よろしくお願いします。
- ベストアンサー
- Perl
- mac で perl open関数について
お世話になります。 現在、perlの勉強中です。 状況は mac osx 10.6.6です。 使用参考書は「perl言語プログラミングレッスン[入門編]」です。 CGIは関係なしで行っております。 open関数について参考書を読みながら、 勉強をしているのですが、openでファイルをオープンするときについてなのですが、 参考書上では、「関数openは、指定されたファイル名を持つファイルをハードディスクから探し出し、オープンしようと試みます」と言う説明があるのですが、 今現在、試している文例では、特定の場所にファイルがあるときでないと、 オープンしてくれません。 文例は [test.pl] use strict; use warnings; my $filename = 'file.txt'; open(FILE, $filename) or die "$filename: $!"; while (my $line = <FILE>){ $line =~ s/ /_/g; print $line; } close(FILE); という形で、ファイルの " " (スペース)を抜き出して "_" （アンダースコア）に置き換えるという設問です。 ただ、現況は /Users/(myname)/Documents/test/test.pl ＃(myname)は私の名前のフォルダです。 にあるコードをターミナル上で実行すると、 /Users/(myname)/file.txt に配置しているときしか、読み込んでくれません。 そこから、ファイルを移動させてしまうと、 読み込んでくれないのです。 そこで、ご質問ですが、 １ 「関数openは、指定されたファイル名を持つファイルをハードディスクから探し出し、オープンしようと試みます」 と参考書に記載がありましたが、実際には探し出しはしてくれないのでしょうか？ それとも、自分のパソコン、コードに問題があるのでしょうか？ ２ 自分が指定した場所にあるファイルをオープンするには どのようにすればよいでしょうか？ ターミナルで指示するのか、それともコードに加えるべきか、 ご指示くださいませ。 また、詳しい方がおられましたら、 お答えいただければと思います。 それでは失礼します。
- ベストアンサー
- Perl
- Excelマクロでファイルオープンのダイアログ表示
エクセルのマクロで、ファイルを開きたいのですが、 ファイルを直接指定するのではなくエクセルのツールバーの 「ファイルを開く」を選んだときのように ファイルをユーザーが選択できるようにダイアログを表示 させたいのです。 OPENメソッドではファイルを直接指定するしかないみたいなのですが・・・ 勉強不足でしたらすいません。 どなたか教えてください。
- ベストアンサー
- Visual Basic
- VBAでファイルOPEN ダイアログを使用したいです
現在、指定したファイルを開くVBAを書いているのですが、 ↓こんなの ----------------------------------------------------------- Dim vntFileName As Variant 'ファイルを開くダイアログを開きます vntFileName = _ Application.GetOpenFilename( _ FileFilter:="エクセルファイル(*.xls),*.xls" & _ ",CSVファイル(*.csv),*.csv" _ , FilterIndex:=1 _ , Title:="開けゴマ" _ , MultiSelect:=False _ ) 'ファイルが選択されているときは '選択したファイルをWorkbooks.Openメソッドで開きます If vntFileName <> False Then Workbooks.Open Filename:=vntFileName End If ---------------------------------------------------------------- あらかじめ開くディレクトリを、ネットワーク上のフォルダに指定したいのですが、どこにパスを書いたらいいのか、わかりません。 教えていただけますでしょうか。
- ベストアンサー
- オフィス系ソフト
- ファイルダイアログについて
VC++ Ver6.0を使用しています。 ファイルダイアログの「保存」（オープンの場合は「開く」） ボタンの表示を「設定」に変更したいのですが、 方法がわかりません。 ご存じの方がいたら、教えてください。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- 巨大ファイルの行をを逆順に並べ替えたい＞perl
下記、perlスクリプトで通常は逆順に並べ替えることができると思うのですが、ファイルの行数が1000万行程度あり、実行すると、PCのメモリを食いつぶしてしまいまともに動作しません。 どのようにすればよいでしょうか? もしくは、これに相当するようなフリーソフトはありますか? ご存知の方教えてください。 宜しくお願い致します。 #!/usr/local/bin/perl open(OUT, "1all.txt"); open (FH , ">out_all.txt"); print FH foreach( reverse <OUT> ); close(FH); close(OUT);
- ベストアンサー
- Perl
お礼
遅くなりましたが、ありがとうございます。 PerlTKを使って見ます。