#! /usr/bin/perl

# Lab Assignment
# Write the code to answer each question and print the answer

# What is the sum of these two numbers?
# What is the difference of these two numbers?

$number1 = 45353875;
$number2 = 7839288;

# Split this string into three parts and print each name by first, middle, and last name
$string1 = "Heather Jennifer Jones";

# Split this string into four parts and print each element separately
$string2 = "element1:element2:element3:element4";

# Test to see if the word science is in this string
# Test to see if this string begins with X
# Test to see if this string ends with Z
$string3 = "X computer Y science Z";

# Search for word carrot and replace word with a fruit, print new string
$string4 = "orange banana carrot";