mirror of
https://git.FreeBSD.org/ports.git
synced 2024-11-23 00:43:28 +00:00
Improve dir() function.
This commit is contained in:
parent
946746b750
commit
690005375e
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=86107
@ -7,7 +7,7 @@
|
||||
|
||||
PORTNAME= Net-FTP-Common
|
||||
PORTVERSION= 2.28
|
||||
PORTREVISION= 1
|
||||
PORTREVISION= 2
|
||||
CATEGORIES= ftp perl5
|
||||
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
|
||||
MASTER_SITE_SUBDIR= ../../authors/id/T/TB/TBONE
|
||||
|
@ -6,7 +6,7 @@
|
||||
# $_ =~ m#([a-z-]*)\s*([0-9]*)\s*([0-9a-zA-Z]*)\s*([0-9a-zA-Z]*)\s*([0-9]*)\s*([A-Za-z]*)\s*([0-9]*)\s*([0-9A-Za-z:]*)\s*([A-Za-z0-9.-]*)#;
|
||||
- $_ = m#([a-z-]*)\s*([0-9]*)\s*([0-9a-zA-Z]*)\s*([0-9a-zA-Z]*)\s*([0-9]*)\s*([A-Za-z]*)\s*([0-9]*)\s*([0-9A-Za-z:]*)\s*([\w*\W*\s*\S*]*)#;
|
||||
+ # $_ = m#([a-z-]*)\s*([0-9]*)\s*([0-9a-zA-Z]*)\s*([0-9a-zA-Z]*)\s*([0-9]*)\s*([A-Za-z]*)\s*([0-9]*)\s*([0-9A-Za-z:]*)\s*([\w*\W*\s*\S*]*)#;
|
||||
+ $_ = m#([a-z-]*)\s*([0-9]*)\s*([0-9a-zA-Z]*)\s*([0-9a-zA-Z]*)\s*([0-9]*)\s*([A-Za-z]*)\s*([0-9]*)\s*([0-9A-Za-z:]*)\s*(\S+)#;
|
||||
+ $_ =~ m#([a-z-]*)\s*([0-9]*)\s*([0-9a-zA-Z-]*)\s*([0-9a-zA-Z-]*)\s*([0-9]*)\s*([A-Za-z]*)\s*([0-9]*)\s*([0-9A-Za-z:]*)\s*(\S+)#;
|
||||
|
||||
my $perm = $1;
|
||||
my $inode = $2;
|
||||
|
Loading…
Reference in New Issue
Block a user