Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Just a short question in Perl
Top Forums Programming Just a short question in Perl Post 302975441 by AIMBOT DC on Monday 13th of June 2016 08:38:08 AM
Old 06-13-2016
Question Just a short question in Perl
Greetings there foreign forum visitors. I am completely new to programming, in fact i have only started today, but i am a fast learner. I decided to undertake Perl and i wrote a simple program that has 2 main loops , each of which are supposed to take an input value number from the user, and check if it fits the requirements (being between 1 and 100 ), and then it will multiply them and find the module. Pretty straight forward. This is what i wrote:

Code:
use strict;

print "this is just a test", "\n";
MAIN_LOOP1:
print "please enter the first number between 1 and 100", "\n";
my $X = <>;
chomp($X);
for $X (1 .. 100)
{
	print "now onto the next step", "\n";
	else
	{
		print " the number does not meet the above requirment", "\n";
		next MAIN_LOOP1;
	}
}
MAIN_LOOP2:
print "please enter the second number between 1 and 100", "\n";
my $Y = <>;
chomp($Y);
for $Y (1 .. 100)
{
	print "now onto the calculations", "\n";
	else
	{
		print " the number does not meet the above requirment", "\n";
		next MAIN_LOOP2;
	}
}
print $X, " * ", $Y, " = ", ($X*$Y), "\n";
print "Finding the module" . "\n";
print $X, " % ", $Y, " = ", ($X%$Y), "\n";
print "Terminate", "\n";


And when i try to execute it in my perl cmd, i get the following errors.

Code:
c:\Strawberry\SCRIPTS>perl new.pl
syntax error at new.pl line 11, near "else"
syntax error at new.pl line 16, near "}"
syntax error at new.pl line 24, near "else"
syntax error at new.pl line 29, near "}"
Execution of new.pl aborted due to compilation errors.

Now i have searched over the forums a bit and i seemed to find other users with the same problem but none of the answers i found ultimately changed the outcome, so i thought to post my thread.

NOTE: This is my first ever program so no making fun. Also if anyone has any better syntax or recommendations, they r more than welcome.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

PERL Question

Can anyone tell me if the copy command in PERL has the same functionality as in KSH shell in UNIX or does it actually move the file ?? $cp_stat=system("cp $ENV{OLAMEBSDIR}/data/olam.ddabal$type $ENV{OLAMDIR}/balance/data/olam.ddabal$type.$HeaderDate"); (1 Reply)
Discussion started by: frank
1 Replies

2. Shell Programming and Scripting

Perl question

Hi everyone, Is Perl compiled? I keep running into references to Perl being compiled which is drivin me nuts because I thought it was an interpreted language. I am tired of the confusion, I am obviously misunderstanding something. Would someone mind explaining to me the exact order of events... (1 Reply)
Discussion started by: Jubba
1 Replies

3. Shell Programming and Scripting

Perl question

Hello Everybody, I am using perl..... I have a variable called line which stores the line of a file. I dont know how many words there will be in this line. But I would like to find out in perl and also store these words in the $1,$2,$3 and $4 variables eg if the line is "first second... (2 Replies)
Discussion started by: rkap
2 Replies

4. Shell Programming and Scripting

perl question

If I use 2 system commands in a script, will one finish before the next one starts? or will it start the first and the second at the same time? i.e. system("ps | grep rminer"); system("ls -al | grep 431"); (1 Reply)
Discussion started by: BG_JrAdmin
1 Replies

5. Shell Programming and Scripting

perl question

perl -wnl -e '/\bsomepattern\b/i and print $&;' I know above command only greps out the somepattern and print them(not entire line).. but how do I look for multiple pattern and only print them.. is that possible? perl -wnl -e '/\bsomepatternd\b/i and /\bsomepattern2\b/i and print $&;' does... (7 Replies)
Discussion started by: convenientstore
7 Replies

6. Shell Programming and Scripting

Perl Question

Hello all, I have the following line: xxx|xxxx|xxxx|xxx.xx|xxx And i insert the values in an array. I am trying to find out if the field of the array (where field=xxx.xx) has the '.' character. I am using the code below but it doesn't seem to work. if($field=~ /./) { ... (3 Replies)
Discussion started by: chriss_58
3 Replies

7. Linux

short question about cron and Mailoutput

Hi Guys, short question - thereīs every 5 minutes an cronjob for user "wwwrun" - and every 5 minutes root gets an email about this cronjob. Now my question: how can i realize, that root donīt get an email about this cronjob but on all other jobs ... perhaps crontab for wwwrun: */5... (2 Replies)
Discussion started by: jackcracker
2 Replies

8. Shell Programming and Scripting

PERL question

Hi, we complied the perl on diff machine ( /opt/dba/perl-5.8.8) . Created TAR and using it on diff box ( again the location is same) . when I tried to put this tar to diff locaiton , it PERL connections are failing . because the @ INC still pinting to : oracle@abc:/opt/dba/oraadmin/tools DEV$... (1 Reply)
Discussion started by: talashil
1 Replies

9. Programming

Perl question

Hi, please help me with below question i am executing the below command from command line perl -e '($hi)=glob("nosum*"); print "$hi"'; As i have nosum_website.sh file in current directory it gave the following output $ perl -e '($hi)=glob("nosum*"); print "$hi"';... (2 Replies)
Discussion started by: ragilla
2 Replies

10. Shell Programming and Scripting

Perl question about

Hello everybody, I am new at the forum and a total newbie when it comes to Unix. I am trying to see how I can add the ability to kill a user's processes? I want to add this to my Shel Script Add the code/process into a subroutine. Also, I would like to use an array to store the list... (0 Replies)
Discussion started by: kinelisch
0 Replies

LEARN ABOUT OPENSOLARIS

print-service

print-service(1M)					  System Administration Commands					 print-service(1M)

NAME

       print-service - select, report, import, export active print service on a system

SYNOPSIS

       print-service  [-s service [-m] | -q | -e file | -i file]

DESCRIPTION

       The print-service utility manages print service selection, as well as export and import of basic print queue configuration.

       Only a user root privileges or with the Printer Management profile can change the active print service or import print queue configuration.

OPTIONS

       The following options are supported:

       -s service

	   Select the active print service for on a host. service can be one of lp or cups.

       -m

	   Migrate print queue configuration during print service selection.

       -q

	   Report the active print service on a host.

       -e file

	   Export basic print queue configuration to a file.

       -i file

	   Import basic print queue configuration from a file.

EXAMPLES

       Example 1 Selecting a Print Service

       The following command selects the CUPS print service as the active print service on a host.

	 # print-service -s cups

       Example 2 Reporting the Active Print Service

       The following command reports the active print service on a host.

	 # print-service -q

       Example 3 Exporting a Print Queue Configuration

       The following command exports the print queue configuration from the active print service.

	 # print-service -e /tmp/queues

       Example 4 Importing a Print Queue Configuration

       The following command imports the print queue configuration to the active print service.

	 # print-service -i /tmp/queues

EXIT STATUS

       0

	   Successful completion.

       non-zero

	   An error occurred.

ATTRIBUTES

       See attributes(5) for descriptions of the following attributes:

       +-----------------------------+-----------------------------+
       |      ATTRIBUTE TYPE	     |	    ATTRIBUTE VALUE	   |
       +-----------------------------+-----------------------------+
       |Availability		     |SUNWpcu			   |
       +-----------------------------+-----------------------------+
       |Interface Stability	     |Obsolete			   |
       +-----------------------------+-----------------------------+

SEE ALSO

       intro(1), attributes(5)

NOTES

       The  print  queue  configuration  saved	and  restored during export, import, and migration is limited to queue name and device name. It is
       likely that further configuration changes will be required before imported or migrated print queues become usable.

SunOS 5.11							    18 Mar 2008 						 print-service(1M)
All times are GMT -4. The time now is 05:38 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy