eleksir/misc
1
Fork 0
Code Activity

acpid.pl: script that triggers pm-hibernate via consolekit stuff when battery charge drops lower than 10%

Browse Source
This commit is contained in:
eleksir
2017-04-04 20:14:54 +03:00
parent cdb6cea959
commit e7a35962e8
2 changed files with 122 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
zip_fb2.pl
View File

@@ -27,13 +27,13 @@ sub zlist(@){
my $item;
foreach $item (@list) {
printf ("zipping: %s to %s.zip", $item, $item);
zip [$item] => "$item.zip", -Level => Z_BEST_COMPRESSION, Minimal => 1, TextFlag => 0, BinModeIn => 1, AutoClose => 1, CanonicalName => 1;
# printf ("zipping: %s to %s.zip", $item, $item);
zip [$item] => "$item.zip", -Level => Z_BEST_COMPRESSION, Minimal => 1, TextFlag => 1, BinModeIn => 1, AutoClose => 1, CanonicalName => 1;
if(length($ZipError) > 0){
printf ("Warning: unable to zip %s - %s\n", $item, $ZipError);
}else{
printf (" and deleting source file\n");
# printf (" and deleting source file\n");
unlink($item);
}