NAME

App::Netdisco::Util::Web

DESCRIPTION

A set of helper subroutines to support parts of the Netdisco application.

There are no default exports, however the ":all" tag will export all subroutines.

EXPORT_OK

request_is_api

Client has requested JSON format data and an endpoint under "/api".

request_is_api_report

Same as "request_is_api" but also requires path to start ""/api/v1/report/..."".

request_is_api_search

Same as "request_is_api" but also requires path to start ""/api/v1/search/..."".

sql_match( $value, $exact? )

Convert wildcard characters ""*"" and ""?"" to ""%"" and ""_"" respectively.

Pass a true value to $exact to only substitute the existing wildcards, and not also add ""*"" to each end of the value.

In list context, returns two values, the translated value, and also an SQL::Abstract LIKE clause.

sort_port( $a, $b )

Sort port names of various types used by device vendors. Interface is as Perl's own "sort" - two input args and an integer return value.

sort_modules( $modules )

Sort devices modules into tree hierarchy based upon position and parent - input arg is module list.

interval_to_daterange( $interval )

Takes an interval in days, weeks, months, or years in a format like '7 days' and returns a date range in the format 'YYYY-MM-DD to YYYY-MM-DD' by subtracting the interval from the current date.

If $interval is not passed, epoch zero (1970-01-01) is used as the start.