JSON::encode_json\s*(({[^{}](?:{[^{}]}[^{}])}))
send_as JSON => $1
Benjamin Alldridge benjaminalldridge
benjaminalldridge
/ replace_encode_json.md
Created
January 11, 2024 02:53
Find and replace JSON::encode_json calls in Perl Dancer2
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * Validate a provided ABN via 3 methods: numerically, via API, and (optionally) mathematically | |
| * | |
| * @param {string} abn The ABN to validate. White space is trimmed at runtime. | |
| * @returns {bool} | |
| */ | |
| function validateAbn(abn) { | |
| // ABR requires a guid to access the API |