1 ##############################################################################
2 # $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/Perl-Critic/lib/Perl/Critic/Exception/Parse.pm $
3 # $Date: 2008-07-03 10:19:10 -0500 (Thu, 03 Jul 2008) $
6 ##############################################################################
8 package Perl::Critic::Exception::Parse;
14 use English qw< -no_match_vars >;
15 use Carp qw< confess >;
18 use Perl::Critic::Utils qw< :characters >;
20 our $VERSION = '1.088';
22 #-----------------------------------------------------------------------------
24 use Exception::Class (
25 'Perl::Critic::Exception::Parse' => {
26 isa => 'Perl::Critic::Exception',
27 description => 'A problem parsing source code.',
28 fields => [ qw< file_name > ],
29 alias => 'throw_parse',
33 #-----------------------------------------------------------------------------
35 Readonly::Array our @EXPORT_OK => qw< throw_parse >;
37 #-----------------------------------------------------------------------------
41 #-----------------------------------------------------------------------------
51 Perl::Critic::Exception::Parse - The code doesn't look like code.
55 There was a problem with PPI parsing source code.
64 Returns the name of the file that the problem was found with, if available.
72 Elliot Shank <perl@galumph.com>
76 Copyright (c) 2008 Elliot Shank. All rights reserved.
78 This program is free software; you can redistribute it and/or modify
79 it under the same terms as Perl itself. The full text of this license
80 can be found in the LICENSE file included with this module.
84 ##############################################################################
87 # cperl-indent-level: 4
89 # indent-tabs-mode: nil
90 # c-indentation-style: bsd
92 # ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :