Select Code to Download

sub access_to_protected_resource {
   my $your_app = shift;
   my ($args) = @_;
...
    my $res = $agent->request($req);
    print "Response:$res\n";
   }

#!/usr/bin/env perl

use strict;
...
builder {
  enable "Plack::Middleware" , start_authorize, webapp->to_app;
   };

Can't locate object method "call" via package "Plack::Middleware" at C
+:/Strawberry/perl/site/lib/Plack/Component.pm line 50, <DATA> line 75
+5.
 at C:\Strawberry\perl\site\lib\Plack\Component.pm line 50
in Plack::Component::__ANON__ at C:\Strawberry\perl\site\lib\Plack\Com
+ponent.pm line 50
...
    8: 
    9: __END__
   10: