Re: use clone -> crash my exe

[Roderich Schupp]

On Tue, Sep 23, 2014 at 9:53 AM, RAPPAZ Francois <francois.rap...@unifr.ch>
wrote:

> C:\strawberry\perl\site\lib>findstr /NS ::clone *.pm


I'd rather search for  "clone::" and also "clone->" instead, eg. a
statement like "$var = clone::whatever()" can trigger your problem.

Or you can instrument Module/ScanDeps.pm:

at line ~761 (in sub scan_file) add

sub scan_file{
    my $file = shift;
    print STDERR "scan_file($file)\n";   # <---

at line ~1000 (in sub scan_chunk) add

    return unless defined($module);
     { my $m = ref($module) ? "@$module" : $module; print STDERR
"scan_chunk($chunk) => $m\n" if $m =~ /\bclone\b/; }        # <---
     return wantarray ? @$module : $module->[0] if ref($module);

and re-run scandeps.pl or pp on your script (w/o cache).


Cheers, Roderich