WWW::PipeViewer::Utils - Various utils.

NAME

WWW::PipeViewer::Utils - Various utils.

SYNOPSIS

use WWW::PipeViewer::Utils;

my $yv_utils = WWW::PipeViewer::Utils->new(%opts);

print $yv_utils->format_time(3600);

SUBROUTINES/METHODS

new(%opts)

Options:

thousand_separator => ""

Character used as thousand separator.

months => []

Month names for format_date()

youtube_video_url_format => ""

A video YouTube URL format for sprintf(format, videoID).

youtube_channel_url_format => ""

A channel YouTube URL format for sprintf(format, channelID).

youtube_playlist_url_format => ""

A playlist YouTube URL format for sprintf(format, playlistID).

extension($type)

Returns the extension format from a given type.

From a string like 'video/webm;+codecs="vp9"', it returns 'webm'.

format_time($sec)

Returns time from seconds.

format_duration($duration)

Return seconds from duration (PT1H20M10S).

format_date($date)

Return string "04 May 2010" from "2010-05-04T00:25:55.000Z"

date_to_age($date)

Return the (approximated) age for a given date of the form "2010-05-04T00:25:55.000Z".

get_entries($result)

Returns the entries for a given result.

has_entries($result)

Returns true if a given result has entries.

normalize_filename($title, $fat32safe)

Replace file-unsafe characters and trim spaces.

format_text(%opt)

Formats a text with information from streaming and video info.

The structure of %opt is:

(
    streaming => HASH,
    info      => HASH,
    text      => STRING,
    escape    => BOOL,
    fat32safe => BOOL,
)

set_thousands($num)

Return the number with thousand separators.

get_video_id($info)

Get videoID.

get_description($info)

Get description.

get_title($info)

Get title.

get_thumbnail($info;$xsize,$ysize)

Get smallest thumbnail of at least ${xsize}x${ysize}.

AUTHOR

Trizen, <echo dHJpemVuQHByb3Rvbm1haWwuY29tCg== | base64 -d>

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc WWW::PipeViewer::Utils

LICENSE AND COPYRIGHT

Copyright 2012-2020 Trizen.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See https://dev.perl.org/licenses/ for more information.

 WWW::PipeViewer::Utils - Various utils.