Skip Menu |

This queue is for tickets about the App-Rad CPAN distribution.

Report information
The Basics
Id: 72429
Status: new
Priority: 0/
Queue: App-Rad

Owner: Nobody in particular
Requestors: FOOLISH [...]

Bug Information
Severity: (no value)
Broken in: 1.04
Fixed in: (no value)

Download (untitled) / with headers
text/plain 893b
App::Rad version 9 required--this is only version 1.04. find me things in @INC: Show quoted text
> perl -e '$_=shift;s{::}{/}g;s/$/.pm/;$mp=$_;print $mp,"\n", map "$_/$mp\n", grep -e
"$_/$mp", @INC' Catalyst::Devel stuff it into an app rad: Show quoted text
> perl ~/.bin/f include -e '$_=shift;s{::}{/}g;s/$/.pm/;$mp=$_;print $mp,"\n", map
"$_/$mp\n", grep -e "$_/$mp", @INC' Catalyst::Devel -e syntax OK see what it looks like: sub cmd1 { my $c = shift; $_ = shift @ARGV; s[::][/]g; s/local ($/).pm/; # <-- this $mp = $_; print $mp, "\n", map("$_/$mp\n", grep(-e("$_/$mp"), @INC)); } deparse seems OK with it: Show quoted text
> perl -MO=Deparse -e '$_=shift;s{::}{/}g;s/$/.pm/;$mp=$_;print $mp,"\n", map
"$_/$mp\n", grep -e "$_/$mp", @INC' Catalyst::Devel $_ = shift @ARGV; s[::][/]g; s/$/.pm/; $mp = $_; print $mp, "\n", map("$_/$mp\n", grep(-e("$_/$mp"), @INC)); -e syntax OK Thanks for the sexy software! =^_^=

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to