subroutine

This script rips out the urls from a downloaded webpage. I had some trouble with this script - when I use the "my $csv_html_line = @_ ;" and then print out the "@html_LineArray" - it just prints out "1's" . When I replace the "my $csv_html_line = @_ ;" with "my $csv_html_line = shift ;" the script works fine. I do not know what the difference is betweeh the "= @_" and shift - becuase I thought that without specifying something, in a subroutine, shift shift froms "@_". #!/usr/bin/perl use warnings; use strict ; sub find_url { my $csv_html_line = @_ ; #my $csv_html_line = shift ; my @html

My code as below, my %srvs = ( serv_1 => { agents => 'agent_path', ... ... }, serv_2 => { <same like above> }, serv_3 => { ... ........ ........ serv_8 => { ... }, ); switch ("$option") { case 1 { print "Option 1 selected. \n"; &main; } case 2 { print "Option 2 selected. \n"; stop(\%srvs); } case 3 { print "Option 3 selected. \n"; start(\%srvs); } else { print "Option are not valid. \n"; exit 0; } } sub stop { my $servs = @_; foreach my $s_name (sort keys %{$servs}) { print "$s_name \n"; my $ssh = Net::OpenSSH->new("<user_id>\@$s_name", timeout=>30); $ssh->error and die "Unable to connect $s

In my program subroutine stlstp passing work(2,1) as parameter to stlfts(...) subroutine. work(2,1) will be double value at that index, but how subroutine converting it as single dimension array x(n) ? When I print x value in stlfts(...) subroutine, it is printing elements of n size, example: STLFTS....X,,, 0.0000000000000000 1.4964418382246345E-317 1.48978578 58438612E-317 1.4964339331743010E-317 1.4964418382246345E-317 4.3367611401 .... My understanding is, except 1st value, all other values in this x are garbage, but not sure how this assignment will will effect original reference? can

I find it a bit weird that I have to wrap defined subroutines anonymously when specifying the -command argument for Tkx widgets. An excerpt from a TkDocs tutorial demonstrates this: my $cb = $frm->new_ttk__button ( -text => "Calculate", -command => sub {calculate();} ); sub calculate { $meters = int(0.3048*$feet*10000.0+.5)/10000.0 || ''; } Why doesn't it work when I write -command => &calculate() or -command => \&calculate() ? You don't have the syntax quite right. Your examples call the subroutine (the & bypasses any prototypes) and passes either the return value ( &calculate() ) or a

I'm doing a project that attaches a subroutine that I wrote to a main file included by the teacher. He gave us the instructions for making our subroutine global but apparently I'm an idiot. The two asm files are in the same folder, I'm using nasm -f elf -g prt_dec.asm and ld prt_dec and then doing the same for main.asm. Here's the relevant code in the main.asm: SECTION .text ; Code section. global _start ; let loader see entry point extern prt_dec _start: mov ebx, 17 mov edx, 214123 mov edi, 2223187809 mov ebp, 1555544444 mov eax, dword 0x0 call prt_dec call prt_lf The line call prt_dec throws

As title states I wish to know does Fortran intent(inout) pass a copy of the value, or a pointer/reference to RAM address? The reason I need to know this is I need to pass a (relatively) big data matrix. If it creates a local copy that would cause me problems. Thank you! Fortran does not specify details of how function and subroutine arguments are passed, but it does require that if a procedure modifies an intent(out) or intent(inout) argument then the changes will be visible to the caller after the procedure returns. It is common for compilers to implement this requirement by passing

I am trying to generalize a function call from a subroutine. So my idea is something like this if (case1) then call MainSubroutine1(myFun) elseif (case2) call MainSubroutine2(myFun) end if do i = 1,4 data = myFun(i) end do I realize this is kind of vague but I am not sure if this is possible. Thank you, John edit 1/31/14 7:57 AM I am sorry for the vague way I phrased this. I was thinking something similar to what @haraldki did but I was hoping that I could define an anonymous function within MainSubroutine1 and MainSubroutine2 and transfer that definition out to the main code. This is because