diff options
| author | JozanLeClerc <bousset.rudy@gmail.com> | 2020-11-01 19:16:58 +0100 |
|---|---|---|
| committer | JozanLeClerc <bousset.rudy@gmail.com> | 2020-11-01 19:16:58 +0100 |
| commit | 66044ef9c4975fb3926217b659a76a82638934e2 (patch) | |
| tree | 84149bedf2dde89ba724700a5b298550a3d11cf9 /.local/bin/unixize | |
| parent | gruvboxed zathura (diff) | |
| download | dotfiles-bsd-66044ef9c4975fb3926217b659a76a82638934e2.tar.gz dotfiles-bsd-66044ef9c4975fb3926217b659a76a82638934e2.tar.bz2 dotfiles-bsd-66044ef9c4975fb3926217b659a76a82638934e2.tar.xz dotfiles-bsd-66044ef9c4975fb3926217b659a76a82638934e2.tar.zst dotfiles-bsd-66044ef9c4975fb3926217b659a76a82638934e2.zip | |
working on unixize
Diffstat (limited to '.local/bin/unixize')
| -rwxr-xr-x | .local/bin/unixize | 33 |
1 files changed, 17 insertions, 16 deletions
diff --git a/.local/bin/unixize b/.local/bin/unixize index 4f03c14..0e05c74 100755 --- a/.local/bin/unixize +++ b/.local/bin/unixize @@ -17,6 +17,9 @@ sub get_og_files return @og_files; } +use constant { + C_O => '', +}; sub unixize_file_names { my @og_files = @_; @@ -30,21 +33,19 @@ sub unixize_file_names $_ =~ s/ /_/g; $_ =~ s/c\+\+/cxx/g; $_ =~ s/C\+\+/CXX/g; - $_ =~ s/[áàåâä]/a/g; - $_ =~ s/[ÁÀÅÂÄ]/A/g; - $_ =~ s/æ/ae/g; - $_ =~ s/Æ/AE/g; - $_ =~ s/ç/c/g; - $_ =~ s/Ç/C/g; - $_ =~ s/[éèêë]/e/g; - $_ =~ s/[ÉÈÊË]/E/g; -ï -î -ì - $_ =~ s/ô/o/g; - $_ =~ s/Ô/O/g; - $_ =~ s/ö/o/g; - $_ =~ s/Ö/O/g; + $_ =~ s/[\x83\x84\x85\x86]/a/g; # âäàå + # $_ =~ s/[ÁÀÅÂÄ]/A/g; + $_ =~ s/\x91/ae/g; # æ + $_ =~ s/\x92/AE/g; # Æ + $_ =~ s/\x87/c/g; # ç + $_ =~ s/\x80/C/g; # Ç + # $_ =~ s/[éèêë]/e/g; + # $_ =~ s/[ÉÈÊË]/E/g; + # $_ =~ s/[ïîì]/i/g; + # $_ =~ s/[ÏÎÌ]/I/g; + # $_ =~ s/[ôöò]/o/g; + $_ =~ s/[\x93\x94\x95]/o/g; # ôöò + # $_ =~ s/[ÿ]/y/g; $_ =~ s/ü/u/g; $_ =~ s/Ü/U/g; $_ =~ s/[^A-Za-z0-9\._]+//g; @@ -71,7 +72,7 @@ sub main chdir('../'); } next if (-e $files[1]); - mv($files[0], $files[1]) or print STDERR $! . "\n"; + # mv($files[0], $files[1]) or print STDERR $! . "\n"; print "'". $files[0] . "' -> '" . $files[1] . "'\n"; } return; |