#!/usr/bin/perl -w
use Student3;
my $student1 = Student3->new;
$student1->set_student;
print "-" x 25, "\n";
$student1->add_courses(["C++", "Java"]);
print "-" x 25, "\n";
$student1->show_student;