0x0001
/ l=J28ApB۪bѿ
`_ ub
&=Ly
AppImage application bundle
AppImage 應用程式套組
AppImage 应用组合包
пакунок із програмами AppImage
AppImage uygulama paketi
AppImage-programbunt
скуп програма Ап-слике
Balík aplikácií AppImage
Пакет приложения AppImage
Pacote de aplicativo AppImage
pacote de aplicação AppImage
Pakiet programu AppImage
AppImage 프로그램 번들
AppImage қолданбалар дестесі
Bundle applicazione AppImage
Bundel aplikasi AppImage
AppImage alkalmazáscsomag
AppImage paket aplikacije
חבילת יישומי AppImage
burla feidhmchláir AppImage
côl di aplicazions AppImage
lot applicatif AppImage
AppImage-sovelluspaketti
AppImage aplikazio bilduma
paquete de aplicación AppImage
AppImage application bundle
AppImage-Anwendungspaket
AppImage-programsamling
balíček AppImage s aplikací
paquet d'aplicació AppImage
Програмен пакет — AppImage
AppImage-toepassingsbundel
" l4(
( fD-
269
# SPDX-License-Identifier: GPL-2.0-only
# builds a module that calls various trace_printk routines
# then to use one (as root): insmod
# This module can also be used to test the trace_printk code.
obj-$(CONFIG_SAMPLE_TRACE_PRINTK) += trace-printk.o
0 0 lze67yLZ7
m_ ub
&=LV[( package Time::Seconds;
use strict;
our $VERSION = '1.3401';
use Exporter 5.57 'import';
our @EXPORT = qw(
ONE_MINUTE
ONE_HOUR
ONE_DAY
ONE_WEEK
ONE_MONTH
ONE_YEAR
ONE_FINANCIAL_MONTH
LEAP_YEAR
NON_LEAP_YEAR
);
our @EXPORT_OK = qw(cs_sec cs_mon);
use constant {
ONE_MINUTE => 60,
ONE_HOUR => 3_600,
ONE_DAY => 86_400,
ONE_WEEK => 604_800,
ONE_MONTH => 2_629_744, # ONE_YEAR / 12
ONE_YEAR => 31_556_930, # 365.24225 days
ONE_FINANCIAL_MONTH => 2_592_000, # 30 days
LEAP_YEAR => 31_622_400, # 366 * ONE_DAY
NON_LEAP_YEAR => 31_536_000, # 365 * ONE_DAY
# hacks to make Time::Piece compile once again
cs_sec => 0,
cs_mon => 1,
};
use overload
'fallback' => 'undef',
'0+' => \&seconds,
'""' => \&seconds,
'<=>' => \&compare,
'+' => \&add,
'-' => \&subtract,
'-=' => \&subtract_from,
'+=' => \&add_to,
'=' => \©
sub new {
my $class = shift;
my ($val) = @_;
$val = 0 unless defined $val;
bless \$val, $class;
}
sub _get_ovlvals {
my ($lhs, $rhs, $reverse) = @_;
$lhs =