#!/usr/bin/perl use strict; use warnings; use File::Slurp; my $filePath = 'test_1.txt'; my @services = `systemctl list-unit-files`; if( my @smb = grep { /enabled/ } @services ) { map { s/\s+\z// } @smb; # remover white space append_file( $filePath, "chkconfig smb: OK\n"); append_file( $filePath, map { "$_\n" } @smb); # append_file( $filePath, "\n"); # if you want to append multiple times } #### #!/usr/bin/perl use strict; use warnings; use IO::All -utf8; # Turn on utf8 for all io my $path = 'file.txt'; my @services = `systemctl list-unit-files`; if( my @smb = grep { /enabled/ } @services ) { s{ ^\s* | \s*$ }{}gx for @smb; io($path)->appendln(@smb); } #### $ cat test_1.txt chkconfig smb: OK acpid.path enabled cups.path enabled accounts-daemon.service enabled anacron-resume.service enabled anacron.service enabled apparmor.service enabled autovt@.service enabled avahi-daemon.service enabled bluetooth.service enabled console-setup.service enabled cron.service enabled cups-browsed.service enabled cups.service enabled dbus-org.bluez.service enabled dbus-org.freedesktop.Avahi.service enabled dbus-org.freedesktop.ModemManager1.service enabled dbus-org.freedesktop.nm-dispatcher.service enabled dbus-org.freedesktop.resolve1.service enabled dbus-org.freedesktop.thermald.service enabled denyhosts.service enabled display-manager.service enabled dns-clean.service enabled friendly-recovery.service enabled getty@.service enabled gpu-manager.service enabled keyboard-setup.service enabled lightdm.service enabled ModemManager.service enabled network-manager.service enabled networking.service enabled NetworkManager-dispatcher.service enabled NetworkManager-wait-online.service enabled NetworkManager.service enabled ondemand.service enabled openvpn.service enabled pppd-dns.service enabled repowerd.service enabled resolvconf.service enabled rsync.service enabled rsyslog.service enabled setvtrgb.service enabled snapd.autoimport.service enabled snapd.core-fixup.service enabled snapd.service enabled snapd.system-shutdown.service enabled ssh.service enabled sshd.service enabled syslog.service enabled systemd-resolved.service enabled systemd-timesyncd.service enabled thermald.service enabled ufw.service enabled unattended-upgrades.service enabled ureadahead.service enabled vboxautostart-service.service enabled vboxballoonctrl-service.service enabled vboxdrv.service enabled vboxweb-service.service enabled acpid.socket enabled apport-forward.socket enabled avahi-daemon.socket enabled cups.socket enabled snapd.socket enabled uuidd.socket enabled remote-fs.target enabled apt-daily.timer enabled motd-news.timer enabled snapd.refresh.timer enabled