文件操作 - Constants.pm
返回文件管理
返回主菜单
删除本文件
文件: /usr/share/perl5/vendor_perl/JSON/WebToken/Constants.pm
编辑文件内容
package JSON::WebToken::Constants; use strict; use warnings; use parent qw/Exporter/; my @error_code = qw/ ERROR_JWT_INVALID_PARAMETER ERROR_JWT_MISSING_SECRET ERROR_JWT_INVALID_SEGMENT_COUNT ERROR_JWT_INVALID_SEGMENT_ENCODING ERROR_JWT_UNWANTED_SIGNATURE ERROR_JWT_INVALID_SIGNATURE ERROR_JWT_NOT_SUPPORTED_SIGNING_ALGORITHM ERROR_JWT_UNACCEPTABLE_ALGORITHM /; our @EXPORT = @error_code; our @EXPORT_OK = (); our %EXPORT_TAGS = ( all => [@EXPORT, @EXPORT_OK], error_code => \@error_code, ); use constant { ERROR_JWT_INVALID_PARAMETER => "invalid_parameter", ERROR_JWT_MISSING_SECRET => "missing_secret", ERROR_JWT_INVALID_SEGMENT_COUNT => "invalid_segment_count", ERROR_JWT_INVALID_SEGMENT_ENCODING => "invalid_segment_encoding", ERROR_JWT_UNWANTED_SIGNATURE => "unwanted_signature", ERROR_JWT_INVALID_SIGNATURE => "invalid_signature", ERROR_JWT_NOT_SUPPORTED_SIGNING_ALGORITHM => "not_supported_signing_algorithm", ERROR_JWT_UNACCEPTABLE_ALGORITHM => "unacceptable_algorithm", }; 1; __END__
修改文件时间
将文件时间修改为当前时间的前一年
删除文件