Landscape トップページ | < 前の日 2003-04-02 2003-04-03 次の日 2003-04-04 >

Landscape - エンジニアのメモ 2003-04-03

続 Perl でファイル名から拡張子を除いて返す


* 続 Perl でファイル名から拡張子を除いて返す

この記事の直リンクURL: Permlink | この記事が属するカテゴリ: [Perl]

- 2002-09-30 のスクリプトは、. が全く存在しない文字列を渡したときに、

Use of uninitialized value のエラーになる。以下のようにするのが良いだろう。
ていうか要求仕様があいまいだなあ。
・拡張子が無いとき ex) access_log
・拡張子が複数ある時 ex) aceess_log.tar.gz
・拡張子しかないとき ex) .htaccess
上記の時に、どんな文字列を返して欲しいのかを決めないと作りようがない。

# ファイル名から拡張子を除いた部分の文字列を返す
sub get_base_name($) {
  my $file_name = shift;
  my $basename = $file_name;
  $basename =~ s/(.*)\..*?$/$1/;
  if ($basename eq '') {
    $basename = $file_name;
  }
  return $basename;
}


すべての記事の見出し (全1029件)
全カテゴリの一覧と記事の数
カテゴリごとに記事をまとめ読みできます。記事の表題だけを見たい場合は、すべての記事の見出し (カテゴリ別表示) へ。

直近30日分の記事
2007-04-23 (Mon)
2007-03-07 (Wed)
2007-02-27 (Tue)
2007-01-17 (Wed)
2007-01-15 (Mon)
2007-01-14 (Sun)
2007-01-08 (Mon)
2006-12-01 (Fri)
2006-11-22 (Wed)
2006-11-20 (Mon)
2006-11-19 (Sun)
2006-09-30 (Sat)
2006-08-29 (Tue)
2006-08-04 (Fri)
2006-07-27 (Thu)
2006-07-23 (Sun)
2006-07-17 (Mon)
2006-07-10 (Mon)
2006-07-06 (Thu)
2006-07-03 (Mon)
2006-06-29 (Thu)
2006-06-28 (Wed)
2006-06-27 (Tue)
2006-06-25 (Sun)
2006-06-19 (Mon)
2006-06-18 (Sun)
2006-06-15 (Thu)
2006-06-11 (Sun)
2006-06-01 (Thu)
2006-05-30 (Tue)
プロファイル
斎藤 宏明。エンジニアです。宇都宮市に住んでいます。
リンク
RSS
スポンサードリンク
Powered by
さくらインターネット

© 斎藤 宏明 Saito Hiroaki Gmail Address
Landscape - エンジニアのメモ http://sonic64.com/
Landscape はランドスケープと読みます。
ひらがなだと らんどすけーぷ です。