我正在嘗試Mac上的Perl。 我必須閱讀一個RTF文本文件。該文件的內容是「36」(沒有雙引號)。這就是它,只有兩個字符。無法在Mac上使用Perl讀取RTF文件
這是我必須閱讀的代碼。
#!/usr/bin/perl
use strict;
use warnings;
my $file = "verInfo.rtf";
unless(open FILE, $file) {
# Die with error message
# if we can't open it.
die "\nUnable to open $file\n";
}
my $oldversion = <FILE>;
print "conent is $oldversion";
close FILE;
記住我要的是從文件中讀取值36,並將其存儲在$ oldversion
一個整數,但是,當我讀文件和打印,其打印以下
conent is {\rtf1\ansi\ansicpg1252\cocoartf1038\cocoasubrtf360
我不是能看懂36
SO社區致力於爲您提供答案。請點擊投票計數下方的複選框以接受其中一個答案。它也會提升你自己的代表分數。 – Zaid
我從來沒有見過像以前那樣打開的文件...過於習慣於打開我的$ fileHandle,'<',$ file或死「無法打開$ file:$!\ n」;' – Zaid
我沒有找到一個「接受答案」按鈕:( – mac