Those are my notes about using the TP-Link Tapo C500 camera in my Linux environment.
More precisely, my Linux system are
- a Debian Testing desktop pc
- a few raspberry pi
- an Asustor NAS that is running a highly customized Linux
******************************************************************************
* COULD NOT FIND LIBSSL HEADERS *
* *
* The libssl header files are required to build Net-SSLeay, but they are *
* missing from /usr. They would typically reside in /usr/include/openssl. *
* *
* If you are using the version of OpenSSL/LibreSSL packaged by your Linux *
* distribution, you may need to install the corresponding "development" *
* package via your package manager (e.g. libssl-dev for OpenSSL on Debian *
On the 30th of June, my cloud provider, Oracle Cloud, decided to shutdown all my servers hosted on two Oracle Cloud accounts.
It is known that this provider will randomly ban accounts without any reason.
Unfortunately and this is 100% my fault for forgetting that, I only had data duplication between servers located in the two Oracle Cloud accounts and no backups.
I thought that I wouldn't get all my accounts in trouble at the same time and able to recover the data from one of the two accounts but unfortunately this turned out otherwise.
Implementing some backup was something I had in my notes for a long time but I think I forgot about it, maybe due to the huge amount of work I spend on the open source projects.
I'm deeply sorry if you have lost your subscriptions list or playlists or watch history. I did try to contact Oracle Cloud for recovering the data, I'm waiting for their answer but you should be certain that they
#!/usr/bin/perl | |
=encoding utf8; | |
=head1 NAME | |
grab-gist - download all the files in a gist | |
=head1 SYNOPSIS |
Windows Registry Editor Version 5.00 | |
[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Google\Chrome] | |
"ForceGoogleSafeSearch"=dword:00000001 | |
"ForceYouTubeRestrict"=dword:00000001 |
@ echo off | |
rem Save as c:\autoexec.bat | |
color a | |
rem Bright green foreground | |
prompt ^> | |
rem Minimal prompt | |
cls |
Perldoc Blead Function
pf
https://perldoc.perl.org/blead/functions/%s
# Indent | |
--indent-columns=2 # Short: -i, Default: 4 | |
# Output | |
--standard-output # Short: -st, Default: --nostandard-output (Short: -nst) | |
# Functions | |
--space-function-paren # -sfp | |
--space-prototype-paren=2 # -spp |
#! /usr/bin/env perl | |
use v5.37.9; | |
use PDF::API2; | |
chdir 'PATH_WITH_PDFS'; | |
my $pdf = PDF::API2 -> new; | |
my $source1 = PDF::API2 -> open( '1.pdf' ); |
perl -n -e 'print if $. == 15' file.txt | |
# where $_ is line's content | |
# -n creates: while (<>) { ... } around files, making Perl iterate over lines | |
# -e option's value goes into { ... } | |
# https://perldoc.perl.org/perlvar#$. |