Catatan Sasongko

Disable fortune postlogin

Secara default, setelah berhasil login di tty muncul pesan-pesan berupa kata-kata mutiara dari para tokoh. Fortune ini menjadi sepaket dengan bsd-games. Jadi kalau ingin di-disable bisa uninstall bsd-games. Kalau masih butuh bsd-games tinggal jadikan file /etc/profile.d/bsd-games-login-fortune.*sh nonexecutable

chmod -x /etc/profile.d/bsd-games-login-fortune.*sh

Mengaktifkan runlevel 4

Runlevel 4 bisa dikatakan sebagai runlevel multiuser dengan graphical user interface saat loginnya. Secara default, Runlevel slackware adalah 3. Untuk mengubahnya ke 4 edit file /etc/inittab, ganti angka 3 pada baris berikut dengan angka 4

id:4:initdefault:

Menggunakan pipewire

Salah satu fitur baru yang dihadirkan Slackware 15.0 adalah masuknya pipewire sebagai alternatif dari pulseaudio. Bagaimana penggunaanya? Silakan simak catatan berikut ini.

Pertama, edit /etc/pulse/client.conf. Ubah autospawn dari yes menjadi no.

Hapus /etc/xdg/autostart/pulseaudio.desktop atau rename menjadi file yang “tidak penting”.

Rename file berikut menjadi .desktop saja

  1. /etc/xdg/autostart/pipewire-media-session.desktop.sample
  2. /etc/xdg/autostart/pipewire-pulse.desktop.sample
  3. /etc/xdg/autostart/pipewire.desktop

Operator perbandingan perl

Operator perbandingan digunakan untuk membandingkan nilai. Data/nilai yang dibandingkan dapat berupa bilangan ataupun string. Namun ada perbedaan notasi.

Perbandingan bilangan

|Contoh penulisan |Penjelasan | |$a < $b | $a lebih kecil dari $b | |$a > $b | $a lebih besar dari $b | |$a <= $b | $a lebih kecil atau sama dengan $b | |$a => $b | $a lebih besar atau sama dengan $b | |$a == $b | $a sama dengan $b | |$a != $b | $a tidak sama dengan $b |

Operator penggabungan pengulangan string perl

Pada perl, variabel scalar yang berupa string dapat dilakukan penggabungan dan pengulangan. Contoh, terdapat 3 variabel sebagai berikut: $sapa = “Hai…. " $distro = “Slackware” $penilaian = “distro terbaik.” Ketiga variabel tersebut akan digabungkan. Kemudian di baris selanjutnya,penampilan variabel $distro akan diulang 5x. Untuk penggabungan digunakan “.”, sedangkan pengulangan dengan “x”.

#!/usr/bin/perl

use strict;
use warnings;
use feature "say";

my $sapa = "Hai.... ";
my $distro = "Slackware ";
my $penilaian = "distro terbaik.";

# penggabungan
say($sapa.$distro.$penilaian);

# pengulangan
say("$distro" x 5);