perl2etags « perl-install - drakx-backup-do-not-use - Mageia Installer and base platform for many utilities

index : drakx-backup-do-not-use

Mageia Installer and base platform for many utilities

Thierry Vignaud [tv]

summary refs log tree commit diff stats

path: root/perl-install/perl2etags

blob: 7a15bf78c88fdd7df9118e00c8e7413ac63afa14 (plain)

#!/usr/bin/perl -p

if (/^/ ... !/^/) {
    ($package) = /(.*).pm,/;
    $package =~ s|/|::|g;
}

s/(\x7F)sub\s+(\w+)(\([^)]*\))?/$1${package}::$2/;