Acme-Lexical-Thief

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         }
      },
      "runtime" : {
         "requires" : {
            "Keyword::Simple" : "0",
            "PadWalker" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Test::Fatal" : "0"
         }
      }
   },
   "provides" : {
      "Acme::Lexical::Thief" : {
         "file" : "lib/Acme/Lexical/Thief.pm",
         "version" : "0.002"
      }
   },
   "release_status" : "stable",

META.yml  view on Meta::CPAN

---
abstract: 'steal lexical variables from your caller'
author:
  - 'Toby Inkster (TOBYINK) <tobyink@cpan.org>'
build_requires:
  Test::Fatal: '0'
configure_requires:
  ExtUtils::MakeMaker: '6.17'
dynamic_config: 0
generated_by: 'Moose::Meta::Class::__ANON__::SERIAL::6 version , CPAN::Meta::Converter version 2.140640'
keywords: []
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Acme-Lexical-Thief

Makefile.PL  view on Meta::CPAN

  "license"        => ["perl_5"],
  "meta-spec"      => {
                        url => "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
                        version => 2,
                      },
  "name"           => "Acme-Lexical-Thief",
  "no_index"       => { directory => ["eg", "examples", "inc", "t", "xt"] },
  "prereqs"        => {
                        configure => { requires => { "ExtUtils::MakeMaker" => 6.17 } },
                        runtime => { requires => { "Keyword::Simple" => 0, "PadWalker" => 0 } },
                        test => { requires => { "Test::Fatal" => 0 } },
                      },
  "provides"       => {
                        "Acme::Lexical::Thief" => { file => "lib/Acme/Lexical/Thief.pm", version => 0.002 },
                      },
  "release_status" => "stable",
  "resources"      => {
                        bugtracker   => {
                                          web => "http://rt.cpan.org/Dist/Display.html?Queue=Acme-Lexical-Thief",
                                        },
                        homepage     => "https://metacpan.org/release/Acme-Lexical-Thief",

doap.ttl  view on Meta::CPAN

@prefix rdfs:  <http://www.w3.org/2000/01/rdf-schema#> .
@prefix xsd:   <http://www.w3.org/2001/XMLSchema#> .

<http://dev.perl.org/licenses/>
	dc:title             "the same terms as the perl 5 programming language system itself".

<http://purl.org/NET/cpan-uri/dist/Acme-Lexical-Thief/project>
	a                    doap:Project;
	dc:contributor       <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap-deps:runtime-requirement [ doap-deps:on "Keyword::Simple 0"^^doap-deps:CpanId ], [ doap-deps:on "PadWalker 0"^^doap-deps:CpanId ];
	doap-deps:test-requirement [ doap-deps:on "Test::Fatal 0"^^doap-deps:CpanId ];
	doap:bug-database    <http://rt.cpan.org/Dist/Display.html?Queue=Acme-Lexical-Thief>;
	doap:created         "2012-12-14"^^xsd:date;
	doap:developer       <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap:download-page   <https://metacpan.org/release/Acme-Lexical-Thief>;
	doap:homepage        <https://metacpan.org/release/Acme-Lexical-Thief>;
	doap:license         <http://dev.perl.org/licenses/>;
	doap:maintainer      <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap:name            "Acme-Lexical-Thief";
	doap:programming-language "Perl";
	doap:release         <http://purl.org/NET/cpan-uri/dist/Acme-Lexical-Thief/v_0-001>, <http://purl.org/NET/cpan-uri/dist/Acme-Lexical-Thief/v_0-002>;

t/02thievery.t  view on Meta::CPAN

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut

use 5.012;
use strict;
use warnings;
use Test::More;
use Test::Fatal;

use Acme::Lexical::Thief;

sub foo {
	steal $x, $y;
	steal 1 $z;
	steal 0x2 @A;
	steal(@B);
	steal
	(