Loading ...
Sorry, an error occurred while loading the content.
 

Re: Res: Res: [PBML] how to show the number of the correct answers

Expand Messages
  • angel_dsgs
    it really helped me a lot thanks again!!!!:) ... has been of the help. ... s/(..)(.)//;print substr$_,1,1; ... answers ... ... while
    Message 1 of 2 , Nov 16, 2006
      it really helped me a lot thanks again!!!!:)


      --- In perl-beginner@yahoogroups.com, tnas <nascimentothiago@...>
      wrote:
      >
      > Hi angel_dsgs,
      >
      > Excuse me for the my negligence in my post. Hope that, however, it
      has been of the help.
      >
      > Regards.
      >
      > perl -e '$_="tMM naaCt Feocmama_itpUilucoGa";$_.=$1,print $2 while
      s/(..)(.)//;print substr$_,1,1;'
      >
      > ----- Mensagem original ----
      > De: angel_dsgs <angel_dsgs@...>
      > Para: perl-beginner@yahoogroups.com
      > Enviadas: Quarta-feira, 15 de Novembro de 2006 6:27:34
      > Assunto: Re: Res: [PBML] how to show the number of the correct
      answers
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      > thanks so much!!!
      >
      >
      >
      > --- In perl-beginner@ yahoogroups. com, tnas
      <nascimentothiago@ ...>
      >
      > wrote:
      >
      > >
      >
      > > A clue:
      >
      > >
      >
      > > ------------ --------- --------- --------- --------- --------
      >
      > > use strict;
      >
      > > use warnings;
      >
      > >
      >
      > > my $ok = 0;
      >
      > >
      >
      > > // Question 1
      >
      > >
      >
      > > print ("Please enter £ two times: ");
      >
      > >
      >
      > > my $pound = <STDIN>;
      >
      > >
      >
      > >
      >
      > > if ($pound eq '££') {
      >
      > >
      >
      > > print("Correct! \n");
      >
      > > ++$ok;
      >
      > >
      >
      > > }
      >
      > >
      >
      > > else {
      >
      > > print("Wrong\ n"); }
      >
      > >
      >
      > >
      >
      > > // Question 2
      >
      > >
      >
      > > print("Please enter \$ four times: ");
      >
      > >
      >
      > > my $dollar = <STDIN>;
      >
      > >
      >
      > >
      >
      > >
      >
      > > if ($dollar eq '$$$$') {
      >
      > > print("Correct! \n");
      >
      > > ++$ok;
      >
      > >
      >
      > > }
      >
      > >
      >
      > > else { print("Wrong\ n"); }
      >
      > >
      >
      > > print "The number of correct questions is: $ok\n";
      >
      > > ------------ --------- --------- --------- --------- --------- -
      >
      > >
      >
      > > HTH.
      >
      > >
      >
      > >
      >
      > > perl -e '$_="tMM naaCt Feocmama_itpUilucoG a";$_.=$1, print $2
      while
      >
      > s/(..)(.)//; print substr$_,1,1; '
      >
      > >
      >
      > > ----- Mensagem original ----
      >
      > > De: angel_dsgs <angel_dsgs@ ...>
      >
      > > Para: perl-beginner@ yahoogroups. com
      >
      > > Enviadas: Segunda-feira, 13 de Novembro de 2006 20:03:37
      >
      > > Assunto: [PBML] how to show the number of the correct answers
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > > hello i need help. i dont know and have no idea on
      how
      >
      > to make a
      >
      > >
      >
      > > program for this,
      >
      > >
      >
      > >
      >
      > >
      >
      > > the program should ask a user 5 questions. it should read the
      >
      > >
      >
      > > answers and shows the number of answers that were right.
      >
      > >
      >
      > >
      >
      > >
      >
      > > example:
      >
      > >
      >
      > >
      >
      > >
      >
      > > Please enter £ two times: ££
      >
      > >
      >
      > > Correct!
      >
      > >
      >
      > >
      >
      > >
      >
      > > Please enter $ four times: ***
      >
      > >
      >
      > > Wrong!
      >
      > >
      >
      > >
      >
      > >
      >
      > > *****
      >
      > >
      >
      > >
      >
      > >
      >
      > > You got 4 correct answers.
      >
      > >
      >
      > >
      >
      > >
      >
      > > I have already written a program for the 5 questions:
      >
      > >
      >
      > >
      >
      > >
      >
      > > e.g.
      >
      > >
      >
      > >
      >
      > >
      >
      > > print ("Please enter £ two times: ");
      >
      > >
      >
      > > $pound = <STDIN>;
      >
      > >
      >
      > > $correct = "Correct!";
      >
      > >
      >
      > >
      >
      > >
      >
      > > if ($pound !~m/££/)
      >
      > >
      >
      > > {
      >
      > >
      >
      > > print("Wrong! \n");
      >
      > >
      >
      > > }
      >
      > >
      >
      > > else
      >
      > >
      >
      > > {
      >
      > >
      >
      > > print("$correct\ n");
      >
      > >
      >
      > > }
      >
      > >
      >
      > >
      >
      > >
      >
      > > print("Please enter \$ four times: ");
      >
      > >
      >
      > > $dollar = <STDIN>;
      >
      > >
      >
      > >
      >
      > >
      >
      > > if($dollar !~m/^(\${4}) $/)
      >
      > >
      >
      > > (
      >
      > >
      >
      > > print("Wrong! \n");
      >
      > >
      >
      > > }
      >
      > >
      >
      > > else
      >
      > >
      >
      > > {
      >
      > >
      >
      > > print("$correct\ n");
      >
      > >
      >
      > > }
      >
      > >
      >
      > >
      >
      > >
      >
      > > my problem is i dont know on how it will read the answers and
      >
      > shows
      >
      > >
      >
      > > the number of answers that were right. i would really appreciate
      >
      > any
      >
      > >
      >
      > > help. thanks!
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > > <!--
      >
      > >
      >
      > > #ygrp-mlmsg {font-size:13px; font-family: arial,helvetica,
      clean,sans-
      >
      > serif;}
      >
      > > #ygrp-mlmsg table {font-size:inherit; font:100% ;}
      >
      > > #ygrp-mlmsg select, input, textarea {font:99%
      >
      > arial,helvetica, clean,sans- serif;}
      >
      > > #ygrp-mlmsg pre, code {font:115% monospace;}
      >
      > > #ygrp-mlmsg * {line-height: 1.22em;}
      >
      > > #ygrp-text{
      >
      > > font-family: Georgia;
      >
      > > }
      >
      > > #ygrp-text p{
      >
      > > margin:0 0 1em 0;
      >
      > > }
      >
      > > #ygrp-tpmsgs{
      >
      > > font-family: Arial;
      >
      > > clear:both;
      >
      > > }
      >
      > > #ygrp-vitnav{
      >
      > > padding-top: 10px;
      >
      > > font-family: Verdana;
      >
      > > font-size:77% ;
      >
      > > margin:0;
      >
      > > }
      >
      > > #ygrp-vitnav a{
      >
      > > padding:0 1px;
      >
      > > }
      >
      > > #ygrp-actbar{
      >
      > > clear:both;
      >
      > > margin:25px 0;
      >
      > > white-space: nowrap;
      >
      > > color:#666;
      >
      > > text-align:right;
      >
      > > }
      >
      > > #ygrp-actbar .left{
      >
      > > float:left;
      >
      > > white-space: nowrap;
      >
      > > }
      >
      > > .bld{font-weight: bold;}
      >
      > > #ygrp-grft{
      >
      > > font-family: Verdana;
      >
      > > font-size:77% ;
      >
      > > padding:15px 0;
      >
      > > }
      >
      > > #ygrp-ft{
      >
      > > font-family: verdana;
      >
      > > font-size:77% ;
      >
      > > border-top:1px solid #666;
      >
      > > padding:5px 0;
      >
      > > }
      >
      > > #ygrp-mlmsg #logo{
      >
      > > padding-bottom: 10px;
      >
      > > }
      >
      > >
      >
      > > #ygrp-vital{
      >
      > > background-color: #e0ecee;
      >
      > > margin-bottom: 20px;
      >
      > > padding:2px 0 8px 8px;
      >
      > > }
      >
      > > #ygrp-vital #vithd{
      >
      > > font-size:77% ;
      >
      > > font-family: Verdana;
      >
      > > font-weight: bold;
      >
      > > color:#333;
      >
      > > text-transform: uppercase;
      >
      > > }
      >
      > > #ygrp-vital ul{
      >
      > > padding:0;
      >
      > > margin:2px 0;
      >
      > > }
      >
      > > #ygrp-vital ul li{
      >
      > > list-style-type: none;
      >
      > > clear:both;
      >
      > > border:1px solid #e0ecee;
      >
      > > }
      >
      > > #ygrp-vital ul li .ct{
      >
      > > font-weight: bold;
      >
      > > color:#ff7900;
      >
      > > float:right;
      >
      > > width:2em;
      >
      > > text-align:right;
      >
      > > padding-right: .5em;
      >
      > > }
      >
      > > #ygrp-vital ul li .cat{
      >
      > > font-weight: bold;
      >
      > > }
      >
      > > #ygrp-vital a {
      >
      > > text-decoration: none;
      >
      > > }
      >
      > >
      >
      > > #ygrp-vital a:hover{
      >
      > > text-decoration: underline;
      >
      > > }
      >
      > >
      >
      > > #ygrp-sponsor #hd{
      >
      > > color:#999;
      >
      > > font-size:77% ;
      >
      > > }
      >
      > > #ygrp-sponsor #ov{
      >
      > > padding:6px 13px;
      >
      > > background-color: #e0ecee;
      >
      > > margin-bottom: 20px;
      >
      > > }
      >
      > > #ygrp-sponsor #ov ul{
      >
      > > padding:0 0 0 8px;
      >
      > > margin:0;
      >
      > > }
      >
      > > #ygrp-sponsor #ov li{
      >
      > > list-style-type: square;
      >
      > > padding:6px 0;
      >
      > > font-size:77% ;
      >
      > > }
      >
      > > #ygrp-sponsor #ov li a{
      >
      > > text-decoration: none;
      >
      > > font-size:130% ;
      >
      > > }
      >
      > > #ygrp-sponsor #nc {
      >
      > > background-color: #eee;
      >
      > > margin-bottom: 20px;
      >
      > > padding:0 8px;
      >
      > > }
      >
      > > #ygrp-sponsor .ad{
      >
      > > padding:8px 0;
      >
      > > }
      >
      > > #ygrp-sponsor .ad #hd1{
      >
      > > font-family: Arial;
      >
      > > font-weight: bold;
      >
      > > color:#628c2a;
      >
      > > font-size:100% ;
      >
      > > line-height: 122%;
      >
      > > }
      >
      > > #ygrp-sponsor .ad a{
      >
      > > text-decoration: none;
      >
      > > }
      >
      > > #ygrp-sponsor .ad a:hover{
      >
      > > text-decoration: underline;
      >
      > > }
      >
      > > #ygrp-sponsor .ad p{
      >
      > > margin:0;
      >
      > > }
      >
      > > o {font-size:0; }
      >
      > > .MsoNormal {
      >
      > > margin:0 0 0 0;
      >
      > > }
      >
      > > #ygrp-text tt{
      >
      > > font-size:120% ;
      >
      > > }
      >
      > > blockquote{margin: 0 0 0 4px;}
      >
      > > .replbq {margin:4;}
      >
      > > -->
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > >
      >
      > > ____________ _________ _________ _________ _________ _______
      >
      > > Novidade no Yahoo! Mail: receba alertas de novas mensagens no
      seu
      >
      > celular. Registre seu aparelho agora!
      >
      > > http://br.mobile yahoo.com/ mailalertas/
      >
      > >
      >
      > >
      >
      > >
      >
      > > [Non-text portions of this message have been removed]
      >
      > >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      > <!--
      >
      > #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-
      serif;}
      > #ygrp-mlmsg table {font-size:inherit;font:100%;}
      > #ygrp-mlmsg select, input, textarea {font:99%
      arial,helvetica,clean,sans-serif;}
      > #ygrp-mlmsg pre, code {font:115% monospace;}
      > #ygrp-mlmsg * {line-height:1.22em;}
      > #ygrp-text{
      > font-family:Georgia;
      > }
      > #ygrp-text p{
      > margin:0 0 1em 0;
      > }
      > #ygrp-tpmsgs{
      > font-family:Arial;
      > clear:both;
      > }
      > #ygrp-vitnav{
      > padding-top:10px;
      > font-family:Verdana;
      > font-size:77%;
      > margin:0;
      > }
      > #ygrp-vitnav a{
      > padding:0 1px;
      > }
      > #ygrp-actbar{
      > clear:both;
      > margin:25px 0;
      > white-space:nowrap;
      > color:#666;
      > text-align:right;
      > }
      > #ygrp-actbar .left{
      > float:left;
      > white-space:nowrap;
      > }
      > .bld{font-weight:bold;}
      > #ygrp-grft{
      > font-family:Verdana;
      > font-size:77%;
      > padding:15px 0;
      > }
      > #ygrp-ft{
      > font-family:verdana;
      > font-size:77%;
      > border-top:1px solid #666;
      > padding:5px 0;
      > }
      > #ygrp-mlmsg #logo{
      > padding-bottom:10px;
      > }
      >
      > #ygrp-vital{
      > background-color:#e0ecee;
      > margin-bottom:20px;
      > padding:2px 0 8px 8px;
      > }
      > #ygrp-vital #vithd{
      > font-size:77%;
      > font-family:Verdana;
      > font-weight:bold;
      > color:#333;
      > text-transform:uppercase;
      > }
      > #ygrp-vital ul{
      > padding:0;
      > margin:2px 0;
      > }
      > #ygrp-vital ul li{
      > list-style-type:none;
      > clear:both;
      > border:1px solid #e0ecee;
      > }
      > #ygrp-vital ul li .ct{
      > font-weight:bold;
      > color:#ff7900;
      > float:right;
      > width:2em;
      > text-align:right;
      > padding-right:.5em;
      > }
      > #ygrp-vital ul li .cat{
      > font-weight:bold;
      > }
      > #ygrp-vital a {
      > text-decoration:none;
      > }
      >
      > #ygrp-vital a:hover{
      > text-decoration:underline;
      > }
      >
      > #ygrp-sponsor #hd{
      > color:#999;
      > font-size:77%;
      > }
      > #ygrp-sponsor #ov{
      > padding:6px 13px;
      > background-color:#e0ecee;
      > margin-bottom:20px;
      > }
      > #ygrp-sponsor #ov ul{
      > padding:0 0 0 8px;
      > margin:0;
      > }
      > #ygrp-sponsor #ov li{
      > list-style-type:square;
      > padding:6px 0;
      > font-size:77%;
      > }
      > #ygrp-sponsor #ov li a{
      > text-decoration:none;
      > font-size:130%;
      > }
      > #ygrp-sponsor #nc {
      > background-color:#eee;
      > margin-bottom:20px;
      > padding:0 8px;
      > }
      > #ygrp-sponsor .ad{
      > padding:8px 0;
      > }
      > #ygrp-sponsor .ad #hd1{
      > font-family:Arial;
      > font-weight:bold;
      > color:#628c2a;
      > font-size:100%;
      > line-height:122%;
      > }
      > #ygrp-sponsor .ad a{
      > text-decoration:none;
      > }
      > #ygrp-sponsor .ad a:hover{
      > text-decoration:underline;
      > }
      > #ygrp-sponsor .ad p{
      > margin:0;
      > }
      > o {font-size:0;}
      > .MsoNormal {
      > margin:0 0 0 0;
      > }
      > #ygrp-text tt{
      > font-size:120%;
      > }
      > blockquote{margin:0 0 0 4px;}
      > .replbq {margin:4;}
      > -->
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      >
      > _______________________________________________________
      > Você quer respostas para suas perguntas? Ou você sabe muito e quer
      compartilhar seu conhecimento? Experimente o Yahoo! Respostas !
      > http://br.answers.yahoo.com/
      >
      > [Non-text portions of this message have been removed]
      >
    Your message has been successfully submitted and would be delivered to recipients shortly.