アドレス下データどちらhttps
このほんのきじゅつがあやまっているのでしょうか。わかるほういらしゃいましたら、ごきょうじゅねがいます。リストのさいごのようそがリストリテラルのねになる?じょうきゅうウィザードを目指してプログラミングPerlをよんでいます！53ページのリストちのせつめいによるとスカラーコンテキストでは、リストのさいごのようそのねがリストリテラルのねになる。OS:TurboLinux6.2DB:Oracle8iApache,PerlはTurboLinux6.2にはいっているものをそのまま使用いか、ソースを記載します。---------------(1)fetchrow_arrayをしようして行のねを取得(こっちはうごく)$dbh = DBI->connect($ds, $user, $pass) || &dbErr("Database can't connect." . $DBI::errstr);$sql = "SELECT SYSDATE FROM DUAL ￥n";$sth = $dbh->prepare( $sql );$sth->execute or die "Cannot execute. " . $sth->errstr();$cnt1 =1;while (@row = $sth->fetchrow_array()) { @{$get_date[$cnt1]} = @row; $cnt1++;}---------------(2)fetchrow_hashrefをしようしてぎょうのねをしゅとく(こっちがうごかない)$dbh = DBI->connect($ds, $user, $pass) || &dbErr("Database can't connect." . $DBI::errstr)。だれかおしえてください。原因がまったくわかりません。fetchrow_arrayとfetchrow_hashrefのつかいかたＪやまとです。とあり$stuff = ("one", "two", "three");では、threeだけがへんすう$stuffにだいにゅうされる。(1)fetchrow_arrayしよう(2)fetchrow_hashrefしよういじょう２通りの方法でためしたのですが、(2)がInternal Server Errorになります。しかし、このコードをじっさいにためしてみると$stuffにはoneがだいにゅうされました。PerlからSELECTぶんを実行して結果のぎょうのねをしゅとくするたんじゅんなスクリプトをさくせいしています。それとも私のやりかたがなにかまちがっているのでしょうか。とあります。
幸い；更新
自作ブログにけいたいメール更新きのうをつけたいじさくでブログをつくりました。がぞうのアップロードきのうもつけたいです。よろしくおねがいします。てんぷファイル画像のアップロードにかんしては、そうしんボタンによるアップロードすらいまだじつげんできていません。データベースとうようかのう。これにけいたいメールでおてがる更新きのうをふかしたいとおもいます。ヒントいただけたらさいわいです。けいたいメールのデータをじゅしんするせってい（？）、スクリプトはどのような書き方をするのでしょうか？SENDMAILでしょうか？タイトル；×××ないよう；×××てんぷファイル；×××.jpgログインID；×××パスワード；×××けいたいメールをじゅしんしたら、データをぶんかいし、データベースについか・こうしんするスクリプトは書けるとおもいます。Perl5.0、テキストファイルです。