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: 6eed722c05535bbdf68485929fdef5018fa9d47c (plain)

#!/usr/bin/perl -p

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

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