Select Code to Download

#!/usr/local/bin/perl
use strict;
use warnings;
             
    system("sdb -d root on 'sdb -d shell; cd /opt; ls';bash ");

    system("sdb -d shell 'cd /opt; ls';bash ");

   system("sdb -d root on");