Perl File::Basename パスからファイル名だけを取得する

このドキュメントの内容は、以下の通りです。

サンプルコード
実行結果

ファイル名を含んだパスからファイル名だけを取得したり、ファイル名の拡張子部分を取り除いたファイル名を取得する場合には、シェルならbasenameコマンドを、Ｃ言語ならbasename(3)関数を利用します。
Perl でパスからファイル名を取得する場合には、 File::Basenameモジュールの basenameを使用します。

ファイル名を取得するには、第1引数にパスを指定します。
拡張子なしのファイル名を取得するには、第1引数にパス、第2引数に拡張子を指定します。

サンプルコード

basename.pl

#!/usr/local/bin/perl -w
use strict;
use File::Basename;

my $file = "/tmp/main.c";

# ファイル名だけ取得する
print basename($file), "\n";

# 拡張子の取り除いたファイル名だけ取得する
print basename($file, ".c"), "\n";

実行結果

% perl basename.pl
main.c
main

参照しているページ (サイト内): [2009-04-27-1]

いつもシェア、ありがとうございます！

もっと情報を探しませんか？

過去ログ

2020 : 01 02 03 04 05 06 07 08 09 10 11 12
2019 : 01 02 03 04 05 06 07 08 09 10 11 12
2018 : 01 02 03 04 05 06 07 08 09 10 11 12
2017 : 01 02 03 04 05 06 07 08 09 10 11 12
2016 : 01 02 03 04 05 06 07 08 09 10 11 12
2015 : 01 02 03 04 05 06 07 08 09 10 11 12
2014 : 01 02 03 04 05 06 07 08 09 10 11 12
2013 : 01 02 03 04 05 06 07 08 09 10 11 12
2012 : 01 02 03 04 05 06 07 08 09 10 11 12
2011 : 01 02 03 04 05 06 07 08 09 10 11 12
2010 : 01 02 03 04 05 06 07 08 09 10 11 12
2009 : 01 02 03 04 05 06 07 08 09 10 11 12
2008 : 01 02 03 04 05 06 07 08 09 10 11 12
2007 : 01 02 03 04 05 06 07 08 09 10 11 12
2006 : 01 02 03 04 05 06 07 08 09 10 11 12
2005 : 01 02 03 04 05 06 07 08 09 10 11 12
2004 : 01 02 03 04 05 06 07 08 09 10 11 12
2003 : 01 02 03 04 05 06 07 08 09 10 11 12