Mercurial > pub > Impl
annotate Lib/IMPL/Web/BadRequestException.pm @ 370:cbf4febf0930
ObjectMeta, Tests, migrating to the new metadata model.
author | sergey |
---|---|
date | Tue, 10 Dec 2013 03:02:01 +0400 |
parents | b56b1ec33b59 |
children |
rev | line source |
---|---|
323
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
1 package IMPL::Web::BadRequestException; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
2 use strict; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
3 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
4 use IMPL::declare { |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
5 base => { |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
6 'IMPL::Web::Exception' => '@_' |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
7 } |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
8 }; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
9 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
10 use IMPL::Resources::Strings { |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
11 message => "The request could not be understood due to malformed syntax" |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
12 }; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
13 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
14 sub status { |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
15 "400 Bad Request"; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
16 } |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
17 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
18 1; |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
19 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
20 __END__ |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
21 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
22 =pod |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
23 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
24 =head1 NAME |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
25 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
26 C<IMPL::Web::BadRequestException> - 400 Bad Request |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
27 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
28 =head1 DESCRIPTION |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
29 |
b56b1ec33b59
minor changes to support JSON in transformation from a query to an object
sergey
parents:
diff
changeset
|
30 =cut |