Revision f2302099
Von Sven Schöling vor etwa 14 Jahren hinzugefügt
| scripts/find-use.pl | ||
|---|---|---|
|
# easily obtained, I'll just hard code the bigger ones we use here. the same
|
||
|
# hash will be filled later with information gathered from the source files.
|
||
|
%requires = (
|
||
|
'DateTime' => {
|
||
|
'DateTime::Duration' => 1,
|
||
|
'DateTime::Infinite' => 1,
|
||
|
},
|
||
|
'Rose::DB::Object' => {
|
||
|
'Rose::DB::Object::ConventionManager' => 1,
|
||
|
'Rose::DB::Object::Manager' => 1,
|
||
| ... | ... | |
|
|
||
|
my ($useline) = m/^use\s+(.*?)$/;
|
||
|
|
||
|
next if $useline =~ /^[\d.]+;/; # skip version requirements
|
||
|
next if $useline =~ /^[\d._]+;/; # skip version requirements
|
||
|
next if !$useline;
|
||
|
|
||
|
$uselines{$useline} ||= [];
|
||
Auch abrufbar als: Unified diff
DateTime Abhängigkeiten, version 5.xx_xx support